用记事本创建一个微信 QQ轰炸器 通信软件通用!

创建一个记事本,黏贴下面的东西:

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

WshShell.AppActivate"小号我的"

for i=1 to 6

WScript.Sleep 100

WshShell.Sendkeys"^v"

WShShell.Sendkeys "%s"

Next

而后保存:后缀改为:.vbs

VBS是基于Visual Basic的脚本语言。VBS的全称是:Microsoft Visual Basic Script Edition

来讲解一下吧:

Set WshShell=WScript.CreateObject("WScript.Shell"):创建的意思

sendkeys    用于输入键盘按键

appactivate 用于聚焦程序

WshShell.AppActivate"小号我的":这个双引号里你要写上你要发送人的昵称。一次只可以一个!

appactive:是获取窗口的,你添加一个昵称之后才可以确定。

因为是窗口,所以你必须打开才可以执行这个操作!是根据Windows窗口来进行选择的,并不是获得你的好友列表。

for i=1 to 6:这个是for循环语句。从1到6.一共6次。当然你也可以写1000,10000之类的!有点恐怖!

前期提示:

Shift---------WshShell.SendKeys "+"

Ctrl---------WshShell.SendKeys "^"

Alt---------WshShell.SendKeys "%"  

WScript.Sleep 100:这个是delay,就是延时的意思!

1000ms=1s。这个是以毫秒为单位的!例子里是延时0.1s.

WshShell.Sendkeys"^v":

这个是两个并用

等同于**Ctrl+v**.就是常说的复制黏贴里的黏贴呀!

WShShell.Sendkeys "%s"

:这个是字符串,可以接受长长的一句。

Next:进行下一个!

且用且小心!

 

 

用源码进行测试的时候!

set wshshell=wscript.createobject("wscript.shell")
WshShell.AppActivate"两个"
for i=1 to 6
WScript.Sleep 100
WshShell.Sendkeys"^v"
WshShell.Sendkeys i
WShShell.Sendkeys "%s"
Next

这个是用来计数的!

 

更加详细的WshShell.SendKeys 用法:

参考:https://blog.csdn.net/weixin_42859280/article/details/83502065

猜你喜欢

转载自blog.csdn.net/weixin_42859280/article/details/83501149