关闭光驱的批处理文件或者程序

有没人知道可以实现关闭光驱命令的批处理或者程序 我是指一次性的

只要运行一下就可以关闭光驱 不是那种修改注册表什么的

不是永久性的那种 我知道。。不想用那种的

即程序运行-光驱关闭-程序退出的 这种。。。

如果你的系统中安装了一个以上的光驱，那么打开记事本，输入以下代码：

Set wmp = CreateObject("WMPlayer.OCX.7")

Set cdrom = wmp.cdromCollection

If cdrom.Count >= 1 then '（该句用来判断你的系统中装了多少个光驱）

For z = 0 to cdrom.Count - 1

cdrom.Item(z).Eject

Next

For z = 0 to cdrom.Count - 1

cdrom.Item(z).Eject

Next

End If

注意将文件类型改为“所有文件”后，将文件保存为“关闭所有.vbe”,在桌面上为该文件建一个快捷方式，以后双击桌面上的快捷方式就可以关闭所有弹出的光驱。

关闭指定的光驱

以下语句可以让你关闭指定的光驱，例如要关闭第一个光驱，我们可以新建个一文本文件，输入以下代码：

Set wmp = CreateObject("WMPlayer.OCX.7")

Set cdrom = wmp.cdromCollection

cdrom.Item(0).Eject

同样将该文件保存为后缀为VBE的文件，命名为“close1.vbe”,以后双击该文件即可关闭你系统中的第一个光驱盘符。在以上语句里，item(0)中的“0”代表第一个光驱盘符，如果要关闭第二个光驱盘符，请将这里的“0”加1，依此类推，就可实现关闭指定的盘符了。

::正常情况下,要是你不插u盘,光驱就是最后盘符,你可以参考下面命令 @echo off for /f "tokens=*" %%i in ('fsutil fsinfo drives ^| find ":"') do @set d=%%i echo %d:~0,-2% pause>nul

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息