自己动手编写VBScript脚本刷QQ群信息

Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "群 -零 起 点"
For i=1 To 10         ' 要发送的次数
WScript.Sleep 500
WshShell.SendKeys "^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
Next

上面这是我写的 代码,我加标注解释给大家了。。
哪里不明白的发贴问我。。。
把它保存成后缀为 vbs文件,然后把你说的话复制到你要发消息的群,记住一定要复制,否则会出现 网页地址
然后你双击那个文件就行。。就会自动发消息了。。

你可能感兴趣的:(VBScript)