自己动手编写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文件,然后把你说的话复制到你要发消息的群,记住一定要复制,否则会出现网页地址
然后你双击那个文件就行。。就会自动发消息了。。
posted @ 2009-11-17 17:23  与时俱进  阅读(892)  评论(0编辑  收藏  举报
友情链接:同里老宅院民居客栈