QQ自动申请代码

心只有你

新建文本文档，另存为.VBS文件

1. Set a=WScript.CreateObject("WScript.shell")
   
2. a.run "http://newreg.qq.com/ " '打开QQ号码申请页面
   
3. WScript.Sleep 3000 '延时10秒，等待页面载入
   
4. a.SendKeys "xiaoyu" '这里填写昵称
   
5. a.SendKeys "{TAB}"
   
6. WScript.Sleep 200
   
7. a.SendKeys "{DOWN}"
   
8. a.SendKeys "{TAB}"
   
9. WScript.Sleep 200
   
10. a.SendKeys "{DOWN}"
    
11. a.SendKeys "{TAB}"
    
12. WScript.Sleep 200
    
13. a.SendKeys "{DOWN}"
    
14. WScript.Sleep 200
    
15. a.SendKeys "{TAB}"
    
16. WScript.Sleep 200
    
17. a.SendKeys "{TAB}"
    
18. WScript.Sleep 200
    
19. a.SendKeys "4820227w" '这里是密码
    
20. a.SendKeys "{TAB}"
    
21. WScript.Sleep 200
    
22. a.SendKeys "4820227w" '再次输入密码
    
23. WScript.Sleep 200
    
24. a.SendKeys "{TAB}"
    
25. WScript.Sleep 200
    
26. a.SendKeys "{TAB}"
    
27. WScript.Sleep 200
    
28. a.SendKeys "{TAB}"
    
29. WScript.Sleep 200
    
30. a.SendKeys "{TAB}"

复制代码

转来的，作者：http://www.9170.org/post-219.html

daocaomen

运行了，没反应

cs19861010

申请成功！您获得的号码为：1617573836此号处于未保护状态

对不起，此IP申请的操作过于频繁，请稍后再试！
使用成功率高的手机免费申请方式
尝试其他的申请方式

Host.HowPick

没成功。 申请的放哪里去了？

大飞机

xx

hfhfg

原帖由 ssh 于 2010-8-23 21:58 发表
不过学习到一点东西！

终于知道自动完成表的一些原理了！

这个是根据按键来完成的，另外还有一些软件是根据关键字来完成的

gdtv

不用验证码？

yc260982

增加自动断号拨号

edmin

申请三个然后就IP限制了

Poison

不过学习到一点东西！

终于知道自动完成表的一些原理了！