以前看到一个例子,是用javascript写的。

解决方案 »

  1.   

    以前看到那个是调用mediaplayer的com写的。
      

  2.   

    找到一个用VBScript写的
    <SCRIPT language=VBScript>
    <!--
    Set oWMP = CreateObject("WMPlayer.OCX.7" )
    Set colCDROMs = oWMP.cdromCollectionif colCDROMs.Count >= 1 then
    For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
    Next ' cdrom
    End If
    -->
    </SCRIPT>
      

  3.   

    up,估计是你的机子上system32下没有WMPlayer.OCX这个文件。拷过去再注册试一试!