创建对象 WMPlayer.OCX 问题
Create object WMPlayer.OCX issue
我在 HTML 页面中使用了以下代码,但它返回 NULL。 (IE8, MS WIndows 7 Pro)
Set Sound = CreateObject("WMPlayer.OCX")
我确定 Windows Media Player 已安装并且工作正常。
如何解决?
似乎不可能像我在 HTML 中使用的那样使用 Visual Basic 代码。
我们必须像这样在 DOM 中使用 Windows Media Player 而不是它
<body onload='' scroll="no">
<object classid="clsid:6BF52A52-394A-11D3-B153-00C04F79FAA6" id="WindowsMediaPlayer"
width="0" height="0">
</object>
然后我们必须实现所有方法到 Start/Stop audio/movie。
例如
<script type="text/vbscript" language="VBScript">
Set oElm = document.getElementById("WindowsMediaPlayer")
if oElm Is Nothing then
' MsgBox("element does not exist")
else
' MsgBox("element exists")
' MsgBox oElm
oElm.controls.stop()
oElm.URL = "C:\HTML\Sounds\oos.wav"
end if
<script>
我在 HTML 页面中使用了以下代码,但它返回 NULL。 (IE8, MS WIndows 7 Pro)
Set Sound = CreateObject("WMPlayer.OCX")
我确定 Windows Media Player 已安装并且工作正常。
如何解决?
似乎不可能像我在 HTML 中使用的那样使用 Visual Basic 代码。
我们必须像这样在 DOM 中使用 Windows Media Player 而不是它
<body onload='' scroll="no">
<object classid="clsid:6BF52A52-394A-11D3-B153-00C04F79FAA6" id="WindowsMediaPlayer"
width="0" height="0">
</object>
然后我们必须实现所有方法到 Start/Stop audio/movie。
例如
<script type="text/vbscript" language="VBScript">
Set oElm = document.getElementById("WindowsMediaPlayer")
if oElm Is Nothing then
' MsgBox("element does not exist")
else
' MsgBox("element exists")
' MsgBox oElm
oElm.controls.stop()
oElm.URL = "C:\HTML\Sounds\oos.wav"
end if
<script>