1、qq自动申请器
复制以下代码,在桌面建一个文本,把代码放进去,然后把文件的扩展名改为.vbs格式即可。
一、修改文本文件的扩展名。
复制以下代码,在桌面建一个文本,把代码放进去,然后把文件的扩展名改为.vbs格式即可。
双击运行(申请到的QQ密码为:a123456)
----------------------------------------------------------------
Set a=WScript.CreateObject("WScript.shell")
a.run " '打开QQ号码申请页面
WScript.Sleep 5000 '延时15秒,
2、等待页面载入
a.SendKeys "abcdefg" '这里填写昵称
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "a123456" '这里是密码
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "a123456" '再次输入密码
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{DOWN}"
a.SendKeys "{TAB}"
WScri
3、pt.Sleep 200
a.SendKeys "{DOWN}"
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{DOWN}"
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{DOWN}"
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{TAB}"
--------------------------------------------------------------------------