紅軟基地 推薦
2012-01-19
4、應用舉例
〖應用之一〗
以下將是一個創(chuàng)建、讀取顯示、修改和刪除注冊表項的腳本示例。程序在每一次進行注冊表的操作之前，都會給出相應的提示，建議大家在運行本程序之前，用一個窗口打開本腳本的源代碼，在另一個窗口打開注冊表編輯器，并找到HKEY_CURRENT_USER根鍵。在每一次出現提示之后，不要急于點擊“確定”，按<TAB>鍵切換到注冊表編輯窗口，按下<F5>刷新一下注冊表的相關鍵值，并觀察程序的執(zhí)行情況與注冊表變化之間的關系。最后切換到提示窗口，按下“確定”繼續(xù)程序的執(zhí)行。這樣，相信大家都能立即理解并學會這幾個方法的使用方法。源代碼如下：
‘DEMO.vbs 這是腳本程序的文件名
Dim RegWsh，sReadKey，sPrompt，sFixprompt
sFixprompt=chr(13)&chr(10)&" 是否與寫入的內容相一致？:) :-) :--)"
MsgBox "此腳本顯示如何創(chuàng)建、讀取、修改和刪除注冊表項。"
Set RegWsh = WScript.CreateObject("WScript.Shell")
MsgBox "創(chuàng)建項 HKCUMyRegKey，數值為 ‘一級鍵值‘"
RegWsh.RegWrite "HKCUMyRegKey"， "一級鍵值"
sReadKey=RegWsh.RegRead("HKCUMyRegKey")
sPrompt="(默認)鍵值為：‘"&sReadKey&"‘"&sFixprompt
msgbox "讀取的HKCUMyRegKey下"&sPrompt
MsgBox "創(chuàng)建項 HKCUMyRegKeyEntry，數值為 ‘二級子鍵‘"
RegWsh.RegWrite "HKCUMyRegKeyEntry"， "二級子鍵"
sReadKey=RegWsh.RegRead("HKCUMyRegKeyEntry")
sPrompt="(默認)鍵值為：‘"&sReadKey&"‘"&sFixprompt
msgbox "讀取的HKCUMyRegKeyEntry下"&sPrompt
MsgBox "修改 HKCUMyRegKeyEntry(默認)鍵值為：‘修改后的二級子鍵‘"
RegWsh.RegWrite "HKCUMyRegKeyEntry"， "修改后的二級子鍵"
sReadKey=RegWsh.RegRead("HKCUMyRegKeyEntry")
sPrompt="(默認)鍵值已經修改為：‘"&sReadKey&"‘"&sFixprompt
msgbox "讀取的HKCUMyRegKeyEntry下"&sPrompt
MsgBox "將數值項 HKCUMyRegKeyValue 設為字符類型（REG_SZ），數值為 1"
RegWsh.RegWrite "HKCUMyRegKeyValue"， 1
MsgBox "將數值項 HKCUMyRegKeyEntry 設為 雙字節(jié)型（REG_DWORD），數值為 2"
RegWsh.RegWrite "HKCUMyRegKeyEntry"， 2， "REG_DWORD"
MsgBox "將數值項 HKCUMyRegKeyEntryValue1 設為 二進制類型（REG_BINARY），數值為 3" RegWsh.RegWrite "HKCUMyRegKeyEntryValue1"， 3， "REG_BINARY" [未結束][iduba_page]MsgBox "以下將刪除 HKCUMyRegKeyEntryValue1 數值"
RegWsh.RegDelete "HKCUMyRegKeyEntryValue1"
MsgBox "以下將刪除 HKCUMyRegKeyEntry 主鍵"
RegWsh.RegDelete "HKCUMyRegKeyEntry"
MsgBox "以下將刪除 HKCUMyRegKey 主鍵"
RegWsh.RegDelete "HKCUMyRegKey"
從上面的例子可以看出，用腳本訪問注冊表其實也很簡單。當然，我們也可以將用VBScript編寫的腳本代碼放在網頁文件（Html文檔）之中，這時，一般無需對代碼進行任何更改，只需要在VBScript代碼的前后，分別加上<script language=vbs>和</script>即可。下面我們再舉一例進行說明：
〖應用之二〗帶毒網頁解析
點擊這里看帶毒網頁演示。如果提示網頁上有錯誤，請下載到本地運行。
[說明]：在使用上面這個“〖應用之二〗帶毒網頁解析”例子的時候，請注意有一定的危險性。一定要事先做好注冊表的備份！如果出現其他異常情況，請盡快用后文中的recover.htm進行恢復�。�！
有了前面所學的知識，我們已經知道，在網頁中調用腳本語言訪問注冊表，其實是很容易的一件事。但如果所訪問的注冊表的鍵值被蓄意的進行了惡意的修改……呵呵。我們的系統的安全性就受到了嚴峻的挑戰(zhàn)。
來源：紅訊頻道