VBS实现QQ自动登录

忙碌的一个月。。。刚做好Python动脑商城，老板又交给我一个新需求，大概是这样子的：能通过程序控制，每天自动添加QQ好友，来省去人工手动添加的时间成本，并且在添加QQ好友的时候，程序自动生成话术，能够分析哪种话术是最为广泛接受，加好友成功率最高的。另一方面，在添加好友时候针对各种验证问题，比如：“我叫什么名字？”“int i = 1;i++=？”，要把这些验证的问题存到数据库，然后分类归纳，通过机器学习的方式，给出答案，我只能说，这个任务任重道远，老板我会尽力的。。。

一开始的思路是通过调用腾讯的自动添加好友接口，但是找了半天API文档，貌似没有找到- -！
附上API文档地址：
http://wiki.open.qq.com/wiki/PC%E5%BA%94%E7%94%A8%E6%8E%A5%E5%85%A5wiki%E7%B4%A2%E5%BC%95
如果有找到的大佬，可以在文后留言提醒我一下吗^ ^

所以接下来的思路就是通过客户端测试工具，QTP也就是UFT来进行重复点击操作。。。后面发现直接写个VBS的脚本更快，反正QTP的本质上就是VBS。
首先尝试自动开启QQ进行登录

set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "你的QQ文件目录" WScript.Sleep 3000       WshShell.SendKeys "{tab}"WScript.Sleep 100WshShell.SendKeys "{tab}"WScript.Sleep 100WshShell.SendKeys "{tab}"WScript.Sleep 100 WshShell.SendKeys "{tab}"WScript.Sleep 100WshShell.SendKeys "{tab}"WScript.Sleep 100WshShell.Sendkeys "{enter}"WScript.Sleep 100WshShell.Sendkeys "{enter}"WScript.Sleep 100WshShell.SendKeys "你的QQ号{tab}"      Wscript.Sleep 300WshShell.SendKeys "你的QQ密码"    Wscript.Sleep 300WshShell.Sendkeys "{enter}"

需要注意的是，文件夹的名如果大于8个字符或者中间有空格，要写成“PROGRA~1”这种形式，就是保留名字的前6个字母然后加上“~1”，这个“~1”代表前6个字母相同文件夹名字的第一个文件夹，例如有2个文件夹中间都有空格：Program Files和Program Filez,那就先以名称排列图标，看最前面的就是~1，第2个就是~2

好像密码不正确是因为密码中包含一些特殊字符，而这些字符在VBS中另有其它含义，这个还没具体研究，碰到这个问题的话，大家只能自行解决。。

新建一个文本文件，将上面代码复制进去，然后将文件改名为AutoQQ.VBS，双击就可以看到效果了。

接下来试试自动添加好友的脚本，本文不断更新ing…