[ Windows/TIM/QQ/WeChat ] 消息轰炸99+

好吧，虽然我是学计算机的，但是我还是踩了坑。

首先在桌面上新建一个文本文档：轰炸机.txt。

双击打开，贴入如下文字。

On Error Resume Next 
Dim wsh,ye 
set wsh=createobject("wscript.shell")
for i=1 to 99
wscript.sleep 99
wsh.AppActivate("这里输入你要发送信息的人的昵称，注意是昵称")
wsh.sendKeys "^v"
wsh.sendKeys i
wsh.sendKeys "%s"
next
wscript.quit

然后点击文件，另存为

 

 这里的编码方式选择为 ANSI。

然后保存，然后把后缀名改成vbs，就可以快乐起来了。

打开 QQ/TIM/微信 输入一段文字，选中复制，然后双击这个 vbs 脚本文件。