自制vbs消息轰炸机
目标
做一个简单的,可以自己输入参数的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