windows10下复制如下代码,另存为文件名.vbs
,保存类型为所有文件,编码为UTF-8
,代码中轰炸机~
为轰炸对象,循环100次,每次程序休眠1000毫秒。
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.AppActivate"轰炸机"
for i = 1 to 100
WScript.Sleep 1000
WshShell.SendKeys"^v"
WshShell.SendKeys i
WshShell.SendKeys"%s"
Next
如果文件格式编码等有问题则弹框提升错误!
在聊天窗口或者任意可以输入文字的地方,打上一段话复制,然后双击该vbs文件,然后把光标移回文本输入框,则可以看到连续不断输出,直至循环结束。如果不想发送,从文本输入框移走光标。
image.png