Javascript目前还做不到这一点.
解决方案 »
- 随机数组 方法的疑惑
- 急 怎样得到mediaplayer的缓存条当前时间!!!
- 怎么获取input file 控件选择的文件的大小呢?
- 请教一下,这个是什么意思
- javascript中的open中的url是否有长度限制??
- javascript不能运行---online waiting
- 变量如何存放在json格式的数组中
- 有关windowsxp下运行javascript不起作用的问题!!!请各位大侠帮忙!小女子先谢过了!!!!
- Easyui-combobox设置多行时,文本内容超出框的宽度,在IE11下不会自动换行,只要在兼容模式下会换行,怎么解决
- 请问在Chrome浏览器下,如何通过变量的值反向查找位于哪个变量或数组中?
- 这么简单的一段JS代码,错在何处???第一个解决的获全分!
- 如何用下拉框来控制超连接?谢谢!!
<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>
<!--
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以上的解码器~~~~~~~~~~~~
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();
}
<!--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>
///////////光驱自动弹出