请问怎样控制光驱的弹出与弹进啊

Question

Javascript目前还做不到这一点.

Answer 1

这个问题吗，用javascript来控制是不行的，因为javascript是用来做前台的，前台就是ie浏览器，它只能控制这东东，想要控制光区，用vb,vc都成，做成应用程序或者dll,用javascript调用不久行了

Answer 2

vbs的，改成js小意思。关键是如何关闭……<div style="width:100%;position:relative;top:1px;filter:alpha(opacity=100);" id=notesPlace align="center">
<button onclick=yunshui()>哥们，点我试试看？</button>
<SCRIPT language=VBScript>
<!--
sub yunshui()
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
colCDROMs.Item(i).Eject
End If
end sub
-->
</SCRIPT>
</div>

Answer 3

呵呵，什么叫如何关闭呀？打开=关闭~~~~~~~~<SCRIPT language=VBScript>
<!--
Dim II,JJ
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollectionIf colCDROMs.Count >= 1 then
For JJ=0 To 1000 '重复1000/2次
For II = 0 to colCDROMs.Count - 1
colCDROMs.Item(II).Eject '多个光驱依次打开//然后依次关闭
Next
Next
End If
-->
</SCRIPT>
这只是理论上的可以不断的重复打开/关闭光驱，前两天帮助朋友作的，呵呵~~~~
客户端需要安装MediaPlay7以上的解码器~~~~~~~~~~~~

Answer 4

js版本的：
function jjcdrom(){
  var oWMP = new ActiveXObject("WMPlayer.OCX.7");
  var colCDROMs = oWMP.cdromCollection;
  if(colCDROMs.Count >= 1) 
      for(var i = 0;i<colCDROMs.Count;i++)colCDROMs.item(i).Eject();
}

Answer 5

<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>
///////////光驱自动弹出