打开记事本 输入以下代码

Set a=WScript.CreateObject("WScript.shell")
a.run "http://newreg.qq.com/" '打开QQ号码申请页面
WScript.Sleep 3000 '延时10秒，等待页面载入
a.SendKeys "张改" '这里填写昵称
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 "{DOWN}"
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "aa123456" '这里是密码
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "aa123456" '再次输入密码
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{TAB}"
WScript.Sleep 200
a.SendKeys "{TAB}"
然后保存 把文件的后缀名改成VBS 默认的一般是TXT（文本文档）
有兴趣的可以去百度百科学VBS语言 虽然和BASIC语言不太一样 对高二一开始的数学也有帮助
找不到后缀名的 随便打开一个文件夹 工具→文件夹选项→查看→把隐藏已知文件类型的扩展名上的勾 去掉
不懂的MMM我
还有 提示一下 申请QQ的时候把输入法关了 最好是用IE申请

VBS是他写的吗、
全是百度的 他好意思 叼P完了

维护正义支持正版！！

楼主是盗版鉴定完毕

qq1205281301 发表于 2013-1-26 15:47
他以为自己很叼啊
我就是修改一下不行啊
他自己开源 管我们什么事

开源是让你学习交流，不是让你修改作者，修改程序名称，然后发布说是自己写的！明白不！你这种人没技术不要叫！叫唤出来是人杂！还 大大咧咧 说 别人开源管你P事，别人开源是公开分享，让你们学习，你直接修改别人程序然后自称自己的就是错的！

qq1205281301 发表于 2013-1-26 15:47
他以为自己很叼啊
我就是修改一下不行啊
他自己开源 管我们什么事

版权狗不解释

死亡土豆 发表于 2013-1-26 15:45
是不是正版 我很怀疑 我刚才请教了一个问题 就是怎么不点击确认注册 在群回复不知道自称菜鸟，敢问正版作何 ...

我又没逼你下自己下载的当然自己解决

他以为自己很叼啊
我就是修改一下不行啊
他自己开源 管我们什么事
这人自私鬼 不解释