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