不知為什么，在微軟目前的操作系統(tǒng)中，光驅(qū)的命令菜單都是只有“彈出”命令，沒有“關(guān)閉”命令。如果我們不想按光驅(qū)的按鈕關(guān)閉彈出的托盤，就不得不依靠安裝第三方軟件來實(shí)現(xiàn)。其實(shí)，我們也可以用VBScript語句彌補(bǔ)這點(diǎn)不足。 關(guān)閉所有光驅(qū) 如果你的系統(tǒng)中安裝了一個(gè)以上的光驅(qū)，那么打開記事本，輸入以下代碼： Set wmp = CreateObject("WMPlayer.OCX.7") Set cdrom = wmp.cdromCollection If cdrom.Count >= 1 then '（該句用來判斷你的系統(tǒng)中裝了多少個(gè)光驅(qū)） 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 注意將文件類型改為“所有文件”后，將文件保存為“關(guān)閉所有.vbe”,在桌面上為該文件建一個(gè)快捷方式，以后雙擊桌面上的快捷方式就可以關(guān)閉所有彈出的光驅(qū)。 關(guān)閉指定的光驅(qū) 以下語句可以讓你關(guān)閉指定的光驅(qū)，例如要關(guān)閉第一個(gè)光驅(qū)，我們可以新建個(gè)一文本文件，輸入以下代碼： Set wmp = CreateObject("WMPlayer.OCX.7") Set cdrom = wmp.cdromCollection cdrom.Item(0).Eject 同樣將該文件保存為后綴為VBE的文件，命名為“close1.vbe”,以后雙擊該文件即可關(guān)閉你系統(tǒng)中的第一個(gè)光驅(qū)盤符。在以上語句里，item(0)中的“0”代表第一個(gè)光驅(qū)盤符，如果要關(guān)閉第二個(gè)光驅(qū)盤符，請將這里的“0”加1，依此類推，就可實(shí)現(xiàn)關(guān)閉指定的盤符了。 我們還可以將“關(guān)閉”添加到光驅(qū)的右鍵菜單中。方法是在注冊表編輯器中依次展開[HKEY_LOCAL_MACHINE/SOFTWARE/Classes/Drive/shell ]分支，然后在右側(cè)窗口中新建 “CloseCDROM”分支，進(jìn)入該分區(qū)后，在右側(cè)窗口雙擊“默認(rèn)”，將其默認(rèn)值修改為“關(guān)閉所有”；再點(diǎn)擊“編輯→新建→項(xiàng)”，將新鍵重命名為“command”,把“默認(rèn)”值修改為“C:/WINDOWS/System32/WScript.exe C:/關(guān)閉所有.vbe”（這里要將C:/改為“關(guān)閉所有.vbe”文件在你系統(tǒng)中保存的路徑）。 用同樣的方法可以將關(guān)閉指定光驅(qū)的命令加入光驅(qū)的右鍵菜單中。修改完畢后，關(guān)閉注冊表就可在右鍵菜單中找到“關(guān)閉所有”和關(guān)閉指定盤符的命令。
