qq群刷屏器VB小脚本
1个回答
展开全部
Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate"ghjj"
for i=1 to 15
WScript.Sleep 500
WshShell.Sendkeys"^v"
WshShell.Sendkeys i
WshShell.Sendkeys "%s"
Next
使用方法:先复制好一段文字,然后打开本VBS脚本,然后点击聊天窗口的输入框,OK。
for i=1 to 15,15是发送次数。
WScript.Sleep 500,500是发送时间间隔单位是毫秒。
WshShell.Sendkeys i 这一句可以去掉,去掉后发送时就不显示发送的次数。
WshShell.AppActivate"ghjj"
for i=1 to 15
WScript.Sleep 500
WshShell.Sendkeys"^v"
WshShell.Sendkeys i
WshShell.Sendkeys "%s"
Next
使用方法:先复制好一段文字,然后打开本VBS脚本,然后点击聊天窗口的输入框,OK。
for i=1 to 15,15是发送次数。
WScript.Sleep 500,500是发送时间间隔单位是毫秒。
WshShell.Sendkeys i 这一句可以去掉,去掉后发送时就不显示发送的次数。
更多追问追答
追问
VBS脚本是什么在哪弄
追答
新建一个文本文档,把代码复制上去,最后保存为( .vbs) 格式的文件。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询