新微赢技术网

标题: 右键菜单中加入"关闭光驱" [打印本页]

作者: 火之雄狮 时间: 2009-11-27 02:26
标题: 右键菜单中加入"关闭光驱"
右键菜单中加入"关闭光驱"
日期过滤
1 编辑脚本－CloseCDROM.vbe 如下:（调用VMP的相关组件实现）
Set Obj=CreateObject("WMPlayer.OCX.7")
Set CD=Obj.CDROMCollection
If CD.Count>=1 then
For i=0 to CD.Count-1
CD.Item(i).Eject
Next
For i=0 to CD.Count-1
CD.Item(i).Eject
Next
End If
2 创建注册表文件－CloseCDROM.reg 安装脚本:（根据需要选择）
Windows Registry Editor Version 5.00
;光驱图标右键中添加"关闭光驱"
[HKEY_CLASSES_ROOT\Drive\shell\CloseCDROM]
@="关闭光驱(&C)"
[HKEY_CLASSES_ROOT\Drive\shell\CloseCDROM\command]
@="C:\\WINNT\\System32\\WScript.exe C:\\WINNT\\CloseCDROM.vbe"
;回收站右键中添加"关闭光驱"
[HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\Shell\CloseCDROM]
@="关闭光驱(&C)"
[HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\Shell\CloseCDROM\command]
@="C:\\WINNT\\System32\\WScript.exe C:\\WINNT\\CloseCDROM.vbe"
3 批处理－右键添加关闭光驱.bat 实现功能：
@echo off
echo 在光驱和回收站右键添加"关闭光驱"...
copy CloseCDROM.vbe %systemroot%
start CloseCDROM.reg
echo 添加成功
echo on
pause

作者: 文文 时间: 2010-3-7 05:05
好好帖很好帖确实好帖少见的好帖

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)