自制vbs消息轰炸机

自制消息轰炸机

目标

做一个简单的，可以自己输入参数的vbs程序,最新图文解释版请移步新博客传送门

准备

• 电脑qq

脚本设计成了可以指定发给某个好友轰炸的形式，在写好以后容错性比较强，但这意味着你想换人的话，需要重新改代码

• vbs脚本

写好的脚本文件已经上传至github，可以直接下载，当然也可以自己写，下面提供源码，文件链接传送门

开工

• 写脚本

  已经不是第一写关于vbs脚本的博客了，对于一些基础的操作不再赘述，可以去看这篇博客了解传送门
  如何新建一个vbs脚本呢？桌面新建一个文本格式的文件，扩展名改为vbs，打开方式为记事本，键入以下代码

Dim WshShell,goal,Str 

Set WshShell=WScript.CreateObject("WScript.Shell")

WshShell.Run"D:TencentBinQQScLauncher.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