如何让光驱自动弹出和关闭?
2011-02-07 23:47
656 查看
想要自动弹出光驱?那么请使用下面的方法一或者方法二。
既想自动弹出光驱,又想自动关闭光驱?请使用下面的方法二。
方法一:
请前往 http://cid-3222d068881c5251.skydrive.live.com/redir.aspx?resid=3222D068881C5251!199 下载 EJECT.EXE,这个程序可以自动弹出光驱,提取自 DOS 程序。如果您不放心,可以下载后杀毒看看~
方法二:
请前往 http://cid-3222d068881c5251.skydrive.live.com/redir.aspx?resid=3222D068881C5251!199 下载 eject_cdrom.vbs。这个是个脚本,是我搜索资料学习后自己编写和调试的,有的杀软可能会报潜在的威胁,不放心的话,您也可以自己下载下来,然后用鼠标右击它,选择"编辑"看看源代码。代码其实蛮简单的,为方便大家学习交流,我将源码展示如下,您也可以自己复制粘贴到记事本中,然后另存为 *.vbs 文件来执行,这样就免去下载了,呵呵。
'CD-ROM 弹出/关闭脚本 by Eric Sheh
'http://www.cnblogs.com/mvperic
'支持多光驱(关闭不适用于笔记本计算机光驱和吸入式光驱)
Set WMP = CreateObject("WMPlayer.ocx")
Set CD = WMP.CDRomCollection
If CD.Count >= 1 Then
For i = 0 To CD.Count - 1
CD.Item(i).Eject
Next
End If
For i = 0 To CD.Count - 1
If vbYes = MsgBox("是否关闭光驱 "& CD.Item(i).DriveSpecifier & " ?" ,vbYesNo Or vbQuestion, APP_TITLE) Then
CD.Item(i).Eject
Else
If CD.Item(i).DriveSpecifier="" Then
Exit For
End If
End If
Next
祝大家新春快乐~大展鸿兔!
既想自动弹出光驱,又想自动关闭光驱?请使用下面的方法二。
方法一:
请前往 http://cid-3222d068881c5251.skydrive.live.com/redir.aspx?resid=3222D068881C5251!199 下载 EJECT.EXE,这个程序可以自动弹出光驱,提取自 DOS 程序。如果您不放心,可以下载后杀毒看看~
方法二:
请前往 http://cid-3222d068881c5251.skydrive.live.com/redir.aspx?resid=3222D068881C5251!199 下载 eject_cdrom.vbs。这个是个脚本,是我搜索资料学习后自己编写和调试的,有的杀软可能会报潜在的威胁,不放心的话,您也可以自己下载下来,然后用鼠标右击它,选择"编辑"看看源代码。代码其实蛮简单的,为方便大家学习交流,我将源码展示如下,您也可以自己复制粘贴到记事本中,然后另存为 *.vbs 文件来执行,这样就免去下载了,呵呵。
'CD-ROM 弹出/关闭脚本 by Eric Sheh
'http://www.cnblogs.com/mvperic
'支持多光驱(关闭不适用于笔记本计算机光驱和吸入式光驱)
Set WMP = CreateObject("WMPlayer.ocx")
Set CD = WMP.CDRomCollection
If CD.Count >= 1 Then
For i = 0 To CD.Count - 1
CD.Item(i).Eject
Next
End If
For i = 0 To CD.Count - 1
If vbYes = MsgBox("是否关闭光驱 "& CD.Item(i).DriveSpecifier & " ?" ,vbYesNo Or vbQuestion, APP_TITLE) Then
CD.Item(i).Eject
Else
If CD.Item(i).DriveSpecifier="" Then
Exit For
End If
End If
Next
祝大家新春快乐~大展鸿兔!
相关文章推荐
- 如何让光驱自动弹出和关闭?
- 如何在关闭窗口的时候,不让浏览器自动弹出确认关闭对话框
- 如何关闭弹出页时,使原页面自动刷新
- JS关闭窗口而不弹出提示 如何让有滚动条的层自动滚动到最下
- 〖原创〗如何实现程序自动关闭powerbuilder弹出的消息窗口?
- fastadmin: layer.open 弹出层如何在表单提交之后自动关闭?
- win7自动更新如何关闭不让其有频率的弹出
- WEB 移动端(微信服务号),点击input标签自动弹出软键盘,如何实现不弹出软键盘!
- SBO自动关闭,弹出Application has a problem.
- 如何关闭iOS系统自动更新提示?
- oracle 10g如何关闭和打开自动收集统计信息
- Android 软键盘自动弹出和关闭
- MFC 如何关闭windows的自动播放窗口
- c#自动关闭 MessageBox 弹出的窗口
- 连接U盘就自动播放如何关闭Win7的自动播放呢?
- 如何关闭 Chrome 的自动更新
- 如何自动关闭thickbox窗口
- C#自动弹出窗口并定时自动关闭
- 如何自动关闭旧窗口
- 消息框,自动弹出及关闭