Vbscript寫注冊表的方法

早些年用過DOS系統(tǒng)的用戶都知道，MS-DOS操作系統(tǒng)允許普通用戶編寫批處理文件來實現(xiàn)簡單的編程。它有效地簡化了我們的工作，帶給我們許多方便。當(dāng)時甚至出現(xiàn)了一些專門編寫批處理文件的程序員呢。 

　　事實上，操作系統(tǒng)除了提供易于操作的使用界面外，還應(yīng)當(dāng)有一套內(nèi)建的Script（腳本）語言才算完整。從某種角度來說，批處理文件可以說就是MS-DOS下的腳本語言。到了Windows時代，雖然Windows系統(tǒng)仍然保留了批處理，但是批處理在Windows中就顯得功能過于簡單，無法滿足用戶的需要了——比如修改注冊表，批處理能做得到嗎？事實上， Windows 98之后的Windows系統(tǒng)，除了保留原來的批處理系統(tǒng)之外，開始加入了對腳本語言的支持，這就是“Windows Scripting Host”，中文譯名為“Windows 腳本宿主”，簡稱WSH。 

　　WSH本身并不是腳本語言，它是腳本語言的運行環(huán)境，WSH支持的腳本語言有JScript（微軟版的JavaScript，與真正JavaScript不太一樣）和VBScript——這個東東大家一定很熟悉啦，網(wǎng)頁上常用。 

　　WSH的腳本引擎（Scripting Engine）有兩種方式，一種是Command方式的CScript.exe，另一種是Windows方式的WScript.exe。我們編寫的腳本程序（擴展名為“.js”和“.vbs”的純文本文件）必須通過這兩者之一來加載運行。 

　　雖然WSH支持JScript和VBScript語言，但仍然要配合WSH本身所提供的一些對象，以及對象的屬性（Properties）和方法（Method）才能夠發(fā)揮最大的效用。關(guān)于JScript和VBScript的程序設(shè)計我們這里就不多說了。我們現(xiàn)在還是把注意力放在WSH的對象上面。事實上，本文涉及的注冊表編程就幾乎不需要關(guān)于VBScript的任何知識，我們只需簡單地套用現(xiàn)成的語句就可以了。 

　　WSH中的對象主要有:WScirpt、WshArguments、WshShell、 WshUrlShortcut、WshNetwork、　　　　WshSpecialFolders、WshCollection、 WshEnvironment、WshShort等。 

　　每一個對象又都有各自的屬性和方法。在這里我們僅就訪問注冊表所涉及的有關(guān)對象的方法和屬性略做介紹。 

 　　首先是WshShell對象。該對象可用來設(shè)置系統(tǒng)環(huán)境變量以及修改注冊表的數(shù)據(jù)。要修改注冊表的數(shù)據(jù)，需要使用WshShell對象的三種方法: RegDelete（刪除注冊表數(shù)據(jù)）、RegWrite（寫入或新建注冊表數(shù)據(jù)）和 RegRead（讀取注冊表數(shù)據(jù)）。 

先看個簡單的例子

'注冊表：regedit
dim WshShell
Set WshShell = CreateObject("Wscript.Shell")
WshShell.RegWrite "HKEY_CURRENT_USER\Software\VMware, Inc.\VMware Tray",0,"REG_SZ"
Wscript.Echo "完畢"
Wscript.Quit

　　通常我們只需要用到前兩種方法，它們具體的使用方法如下: 

一、RegWrite（寫入或新建注冊表數(shù)據(jù)） 

　　* 新建子主鍵 

　　語法為:WshShell.RegWrite　"子主鍵名" 

　　例如，我們想新建一個子主鍵“HKEY_CURRENT_USERMyReg”，可使用如下的語句: 

　　WshShell.RegWrite "HKCUMyReg" 

　　說明:子主鍵名必須以反斜線 () 結(jié)束，若不小心忘記輸入了這個()，則該方法返回的是鍵值，即表示你是想在　　HKEY_CURRENT_USER下建立了一個名叫MyReg的鍵值了。這一點一定要十分注意！ 

　　注意引號里子主鍵的開頭必須是下列根鍵名之一: 

　　HKEY_CURRENT_USER（可簡寫為HKCU）、HKEY_LOCAL_MACHINE （HKLM）、HKEY_CLASSES_ROOT（HKCR）、　　HKEY_USERS和HKEY_CURRENT_CONFIG 

　　* 在子主鍵下建立新的鍵值（或改寫已有的鍵值的數(shù)據(jù)） 

　　語法為:WshShell.RegWrite　"子主鍵名鍵值名","鍵值的數(shù)據(jù)","鍵值的類型" 

　　例如我們想在子主鍵“HKEY_CURRENT_USERMyReg” 下新建一個字符串鍵值KeyValue，設(shè)置鍵值的數(shù)據(jù)為“str”，可使用如下的語句: 

WshShell.RegWrite "HKCUMyRegKeyValue", "str" 

　?。ㄗ?鍵值為字符串值，可省去"鍵值類型"的聲明） 

　　若所建的為二進制值或DWORD值，數(shù)據(jù)為“1”，則還必須聲明鍵值的類型，如下： 

　　WshShell.RegWrite "HKCUMyRegKeyValue",1,"REG_BINARY" 

　　WshShell.RegWrite "HKCUMyRegKeyValue",1,"REG_DWORD" 

　　注意二進制值和DWORD值的數(shù)據(jù)不能加引號，而字符串值的數(shù)據(jù)則必須加引號。 

二、RegDelete（刪除注冊表數(shù)據(jù)） 

　　* 刪除一個子主鍵 

　　語法為:WshShell.RegDelete "子主鍵名" 

　　例如，我們想刪除子主鍵“HKEY_CURRENT_USERMyReg”，可使用如下的語句: 

　　WshShell.RegDelete "HKCUMyReg" 

　　* 刪除子主鍵的某個鍵值 

　　語法為:WshShell.RegDelete "子主鍵名鍵值名" 

　　例如，我們想刪除子主鍵“HKEY_CURRENT_USERMyReg” 的鍵值KeyValue，可使用如下的語句: 

　　WshShell.RegDelete "HKCUMyRegKeyValue" 

　　類似于RegWrite，有一個“”號表示的是刪除子主鍵，沒有“”則表示要刪除的是子主鍵下的鍵值。 
除了WshShell對象外，我們還必須了解一下WScirpt 對象。WScirpt對象即代表Scripting　Engine，只要啟動Engine就會自動產(chǎn)生此對象。WScript對象提供了創(chuàng)建和讀取對象的方法。要使用WSH的其他對象（例如WshShell對象），就必須先用WScript對象的有關(guān)方法（CreateObject、GetObject）來創(chuàng)建和讀取。 

　　創(chuàng)建對象的語法如下: 

　　WScript.CreateObject(strProgID) 

　　其中strProgID就是我們所要創(chuàng)建的對象的標(biāo)識名。 

　　例如:我們要使用WshShell對象及其屬性和方法，首先就要用WScript對象的方法CreateObject來創(chuàng)建一個WshShell對象，語句如下: 

　　Set WSHShell = WScript.CreateObject("WScript.Shell") 

　　舉一個例子吧。大家都知道，如果你使用了“開始”菜單中的“運行”，Windows將在列表框里記錄下你“作案” 的痕跡。其實這些數(shù)據(jù)是記錄在注冊表中HKEY_CURRENT_USERSoftwareMicrosoftWindows 

　　CurrentVersionExplorerRunMRU子鍵下，我們只要把這個子鍵刪除，然后再重新建立，不就可以了嗎？ 

　　現(xiàn)在我們可以來編寫一個腳本了。以VBS為例，我們可以用記事本新建一個文件，然后輸入（其中“//”后的文字為注釋，不必輸入）: 

　　//定義對象，要編輯注冊表，我們需要使用WSHShell對象及其方法 
　　Dim WSHShell 
　　//對象的方法CreateObject來創(chuàng)建WSHShell對象 
　　Set WSHShell = WScript.CreateObject("WScript.Shell") 
　　//然后我們使用WSHShell對象的方法RegDelete來刪除 HKEY_CURRENT_USERSoftwareMicrosoft 
　　WindowsCurrentVersionExplorerRunMRU子鍵 
　　WSHShell.RegDelete "HKCUSoftwareMicrosoft 
　　WindowsCurrentVersionExplorerRunMRU" 
　　//最后我們恢復(fù)該主鍵，并在該主鍵下恢復(fù)字符串值“MRUList”，設(shè)置其數(shù)據(jù)為空串 
　WSHShell.RegWrite "HKCUSoftwareMicrosoft 
　　WindowsCurrentVersionExplorerRunMRUMRUList","" 

　　程序到此結(jié)束，我們把文件另存為CleanMRU.vbs就可以了?，F(xiàn)在我們就可以使用Scripting Engine來執(zhí)行這個程序了。假設(shè)我們剛才把這個文件保存在D:TEMP里，我們就可以使用“開始”菜單的“運行”——Wcript.exe D:TEMPCleanMRU.vbs。重新啟動，怎么樣？“運行”里已經(jīng)是空空如也了吧！ 

　　如果我們這樣費盡心思地編了程序，最后還是得靠手工來運行，那還不如每次直接用注冊表編輯器來操作呢！其實我們完全可以讓它在每次開機時自動加載。這么一說，大家肯定都知道了——我們可以使用注冊表編輯器，在“HKEY_LOCAL_MACHINESoftwareMicrosoftWindows 

　　CurrentVersionRun”子主鍵下建立一個字符串值 “CleanMRU”，設(shè)置其數(shù)據(jù)為"Wcript.exe D:TEMPCleanMRU.vbs"。嘿嘿，這樣才算大功告成。以后你每次開機，Windows就會自動執(zhí)行該腳本以清除 “運行”中的歷史記錄了。 

　　限于篇幅，本文僅僅介紹了WSH有關(guān)注冊表修改部分的對象的初步使用。我們只要在腳本里加上一些簡單的語句，就可以很方便地實現(xiàn)交互性的操作——當(dāng)然，這就需要大家掌握更多的關(guān)于WSH和VBScript的知識。如果感興趣的話，大家可以到微軟網(wǎng)站下載有關(guān)WSH和VBScript的幫助文檔，URL分別是http://www.microsoft.com/china/ scripting/windowshost/wshdoc.exe和http://www.microsoft.com/china/scripting/vbscript/download/ vbsdoc.exe（都是中文）。另外，在Windows的Samples目錄下，有一個WSH文件夾，那里面有不少.vbs和.js例程，大家可以去打開來看看（鼠標(biāo)右擊圖標(biāo)，選擇“編輯”），相信一定會有不少收獲的。 

　　最后，如果你的機器上已經(jīng)安裝了Windows Scripting Host，而VBS程序仍然無法運行的話，很可能是你自己或其他應(yīng)用程序修改了.VBS的關(guān)聯(lián)。據(jù)筆者所知，幾乎每臺機器上都裝有的“超級解霸”就會修改.VBS文件的關(guān)聯(lián)。沒關(guān)系的，你只要從“控制面板”—“添加/刪除程序”—“Windows安裝程序”—“附件”—“詳細資料”里先卸掉，然后再重新裝上“Windows Scripting Host”就可以了。