qq消息重復發送
01、電腦桌面右鍵,選擇新建文本文檔。

02、點擊我的電腦,再點擊查看按鈕,將文件擴展名勾選上,可以看到之前新建的文本文檔的后綴顯示出來了。
03、填寫無數字的代碼。在.txt中填寫,代碼如下:(如圖)沒有數字的,顯示發送了多少次:dim wshshell,aset wshshell=createobject("wscript.shell")a=inputbox ("輸入要發信息次數"&chr(13)&chr(13)&"*******★life制作★******"&chr(13)&chr(13)&"請確定剛才光標是在QQ窗體內!","提示")WshShell.AppActivate "" '當前激活的聊天窗口名,例如"QQ群 - 群",在打開的對話框上有顯示'wscript.sleep 1000for i=1 to 100 '循環的次數100'wscript.sleep 500 '暫停500毫秒'wshshell.sendkeys "^v" '粘貼wshshell.sendkeys "%s" '%s=enter和sendkeysSendKeys +發送內容'nextwscript.quit
04、填寫有數字的代碼。在.txt中填寫,代碼如下:有數字的,顯示發送了多少次:dim wshshell,aset wshshell=createobject("wscript.shell")a=inputbox ("輸入要發信息次數"&chr(13)&chr(13)&"*******★life制作★******"&chr(13)&chr(13)&"請確定剛才光標是在QQ窗體內!","提示")WshShell.AppActivate "" '當前激活的聊天窗口名,例如"QQ群 - 群",在打開的對話框上有顯示'wscript.sleep 1000for i=1 to 100 '循環的次數100'wscript.sleep 500 '暫停500毫秒'wshshell.sendkeys "^v" '粘貼'wshshell.sendkeys i '數字'wshshell.sendkeys "%s" '%s=enter和sendkeysSendKeys +發送內容'nextwscript.quit
05、右鍵選中文檔,點擊重命名,將文本文檔的后綴改為.vbs,確定。這樣程序就設置好了。
06、雙擊程序,在對話框中輸入你想輸入的內容,如:青春飛揚。然后選中輸入的內容,ctrl+x(剪切)或者ctrl+c(復制)確定,再把鼠標的光標放在qq輸入框里,就行了。
07、如果有防火墻組織,點擊允許即可。
08、圖片也可以這樣操作發送。
相關文章:
