1.qq申请器
qq申请器
我有 源码
Set a=WScript.CreateObject("WScript.shell")
a.run "/" '打开QQ号码申请页面
WScript.Sleep '延时秒,申请q申等待页面载入
a.SendKeys "百度路人" '这里填写昵称
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ DOWN}"
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ DOWN}"
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ DOWN}"
WScript.Sleep
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "" '这里是器源请器切换为源码模式密码
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "" '再次输入密码
WScript.Sleep
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ TAB}"
WScript.Sleep
a.SendKeys "{ TAB}"
复制到记事本 文件名为“QQ申请器。VBS”
申请q申案件精灵源码这就不怕有毒啦
申请q申案件精灵源码