QQ消息轟炸器(連發任意條,任意消息)

先來程序

Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate ""
for i=0 to 10
WScript.Sleep 500
WshShell.SendKeys "^v"
WshShell.SendKeys "%s"
next 

這裏的i=0 to 10是發送的次數,這裏是十次,自己可以修改

準備工作

新建一個txt文件將代碼複製進去,將txt後綴名改爲vbs
在這裏插入圖片描述

如何使用

首先打開你要發送消息的窗口,在發送欄輸入你要發送的消息,然後複製或者剪切消息,然後雙擊vbs程序,就可以發送了!
在這裏插入圖片描述
在這裏插入圖片描述

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章