刷QQ群的VBS脚本
时间:2022-01-18 10:21:25|栏目:VBS|点击: 次
使用方法:讲以下代码保存为QQ.vbs,然后复制你要发送的东西,双击QQ.vbs就可以自动刷屏拉!
注意:本代码仅作为技术研究之用,请勿非法使用!
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
注意:本代码仅作为技术研究之用,请勿非法使用!
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 复制指定文件到指定目录下
栏 目:VBS
下一篇:VBS基础编程教程 (第6篇)
本文标题:刷QQ群的VBS脚本
本文地址:http://www.codeinn.net/misctech/190568.html