10.8w+
社区成员
当前发帖距今超过3年，不再开放新的回复
发表回复
yjred 2003-07-26
- 打赏
- 举报
up,估计是你的机子上system32下没有WMPlayer.OCX这个文件。拷过去再注册试一试！
lustful 2003-07-26
- 打赏
- 举报
找到一个用VBScript写的
<SCRIPT language=VBScript>
<!--
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
-->
</SCRIPT>
<SCRIPT language=VBScript>
<!--
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
-->
</SCRIPT>
billtzh 2003-07-26
- 打赏
- 举报
可惜那个能跳出光驱的网页在我机器上不行。在同学机器上却行。郁闷。
Godshow 2003-07-26
- 打赏
- 举报
以前看到那个是调用mediaplayer的com写的。
jiayuanliao 2003-07-26
- 打赏
- 举报
以前看到一个例子，是用javascript写的。