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
posted @ 2019-02-17 23:46  AlexKing007  阅读(118)  评论(0)  编辑  收藏  举报