自动发QQ消息脚本

自动发QQ消息脚本
 

Set WshShell= WScript.Createobject("WScript.Shell")
for i=1 to 50
WScript.Sleep 1000

WshShell.SendKeys"^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
next

保存为*.vbs
50代表发送次数
1000(发送间隔时间)
^v(快捷键)
用法:
先随便打开一个QQ的对话框
然后切换到英文输入法
copy你需要copy的文字然后双击vbs脚本
可以看到每隔一秒发送一个消息。
如果你想结束脚本。打开进程管理器 结束 wscript.exe

你可能感兴趣的:(qq,脚本,输入法)