目標
做一個簡單的，可以自己輸入參數的vbs程序,最新圖文解釋版請移步新博客傳送門
准備
-
電腦qq
腳本設計成了可以指定發給某個好友轟炸的形式，在寫好以后容錯性比較強，但這意味着你想換人的話，需要重新改代碼
-
vbs腳本
寫好的腳本文件已經上傳至github，可以直接下載，當然也可以自己寫，下面提供源碼，文件鏈接傳送門
開工
-
寫腳本
已經不是第一寫關於vbs腳本的博客了，對於一些基礎的操作不再贅述，可以去看這篇博客了解傳送門
如何新建一個vbs腳本呢？桌面新建一個文本格式的文件，擴展名改為vbs，打開方式為記事本，鍵入以下代碼
Dim WshShell,goal,Str
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run"D:\Tencent\Bin\QQScLauncher.exe /uin:2486972462 /quicklunch:0D69D76A148C96AD3BD3F1342ECD460AB9BD04E223B626D8E3619539AB22AE296747E393DC293F33"
WScript.Sleep 2000
goal=Inputbox("輸入轟炸次數",,20)
Str=InputBox("輸入轟炸內容",,"")
WshShell.run "mshta vbscript:clipboardData.SetData("+""""+"text"+""""+","+""""&str&""""+")(close)",0,true
For i=1 To goal
WshShell.SendKeys "^v"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
Next
WScript.Sleep 3000
WshShell.SendKeys"%{F4}"
看到第3行代碼的D:Tencent什么的嗎，那行就是用來打開指定好友的聊天框的，如何獲取我們下面講
-
獲取好友聊天框的快捷方式
其實之前博客也有寫的，但是慘兮兮，markdown的圖片貌似都不能用了，我在此就口述一下，不放圖了
1.電腦qq啟動，打開你的好友面板，雙擊他的頭像，進入聊天框（這都會吧）
2.聊天框對方名字下面有3個點，也就是在qq電話，qq視頻后面那3個點，我們把鼠標移動過去，發現會彈出一行圖標，這時我們把鼠標移動到4個方塊的圖標那里
3.果然，又出了一列選項，好了，我們點擊生成桌面快捷方式
4.到桌面找到這個圖標，新鮮熱乎的快捷方式，右鍵它然后按R，查看屬性
5.這時候屬性首頁會出現“目標”這個屬性欄，並且后面有一個框框了好多代碼還給你自動選中了，標了藍色
6.對，就是這行東西，他給你自動選中了你就直接Ctrl-C，沒有的話就點一下再按Ctrl-A全選，Ctrl-C復制
7.快捷方式已獲得，我們把剛才說的代碼文件第3行文件，引號里的內容進行替換，然后保存退出
樣例
使用方式很簡單，雙擊vbs腳本即可，沒有圖片繼續口胡。
雙擊以后，等2秒，彈出對方的聊天框，然后又彈出編輯框，提示輸入轟炸次數，默認20，可以更改
輸入轟炸次數並確認后，彈出編輯框輸入轟炸內容，這就不多說了，再次確認之后，就放開鼠標鍵盤，等程序給你自己操作吧，嘻嘻嘻
提醒大家，轟炸別過分了，短時間內發太多相同內容，會被騰訊封號，小號被封過~
等轟炸結束以后，聊天框會自動關閉，恢復正常
后記
代碼有很多細節的地方沒有說，當然其實這個腳本也特別簡單，學過一些vbs的應該可以看得懂，當然消息之間的間隔也是可以在代碼中改的，我默認設置0.1s了，祝大家玩的開心！
2019/4/19 17:01:53