发新话题
打印

VBS的刷屏程序。超级简单的

VBS的刷屏程序。超级简单的

Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "netice"
for i=1 to 20
   WScript.Sleep 1000
   WshShell.SendKeys "^v"
   WshShell.SendKeys i
   WshShell.SendKeys "%s"
next


只要把上边的代码复制下,然后粘贴的记事本,保存为扩展名为"vbs"的就OK了
打开你的QQ给你最讨厌的一个人(别给我)写上一句话,复制下,双击刚刚那程序
把焦点点到QQ发送框里就看到效果了   
别干坏事。。这个是防身用的,不要用来攻击别人哈

我写的是慢的1秒一次,只发送20次。。呵呵想改下的话,自己把上边的20改下
把1000改成其他的数字(500为半秒)

TOP

发新话题