autoit实现QQ自动化聊天,但.......

小米啊 · 发表于 2009-8-2 21:34:42

最近在看 watir开源的代码,看到里面有一个autoitx3.dll文件,看完 autoitx3.dll帮助文档,
就想用autoit实现一个QQ自动登录,并发送消息给好,但在好友分组那对象无法识别,用QTP也抓不出来
请问 autoitx高人,应该怎么处理呢!
多谢!

QQ登录的部分 vbs脚本

Set oAutoIt = CreateObject("AutoItX3.Control")

'start qq
PID=oAutoIt.Run( "D:\\Program Files\\Tencent\\QQ\\QQ.exe")
oAutoIt.WinWaitActive "QQ用户登录","",20

'input username and password
oAutoIt.Send "{Tab}304170159{Tab}*****"

'check autologin
oAutoIt.ControlFocus  "QQ用户登录","","Button2"
oAutoIt.ControlClick "QQ用户登录","自动登录","Button2","left","1"
oAutoIt.ControlCommand "QQ用户登录","","Button2","Check",""

'selected status
oAutoIt.ControlFocus  "QQ用户登录","","Button16"
oAutoIt.ControlClick "QQ用户登录","自动登录","Button16","left","1"
oAutoIt.send "{DOWN  2}{ENTER}"

'click login
oAutoIt.ControlFocus "QQ用户登录","","Button11"
oAutoIt.ControlClick "QQ用户登录","","Button11","left","1"
're-login and closedialog
If oAutoIt.WinExists("QQ") Then
      oAutoIt.ControlFocus "QQ","","Button1"
      oAutoIt.ControlClick "QQ","","Button1","left","1"
      oAutoIt.ProcessClose(PID)
End If
'还想实现自动发送功能,可对象识别不到!!!