聊天窗口轰炸 vbs

聊天窗口信息轰炸.vbs

On Error Resume Next 
Dim wsh,ye 
set wsh=createobject("wscript.shell") 
for i=1 to 10
wscript.sleep 700 
wsh.AppActivate("愁人的名字") 
wsh.sendKeys "^v" 
wsh.sendKeys i 
wsh.sendKeys "%s" 
next 
wscript.quit

写一个txt文件，把代码放进去，改名为 .vbs

把聊天窗口上面人的名字copy到文件汉字覆盖
在聊天输入框输入一段文字
Ctrl+c
双击vbs文件，即可达到想要的效果