有空尝试了一下,我用的腾讯TIM,QQ应该也可以用。Opt("MouseCoordMode", 2) ;使用客户区的相对坐标(注意修改窗口探测工具的坐标模式)
AutoItSetOption("SendCapslockMode", 0)
Send("{CAPSLOCK OFF}") ;关闭大写
;修改win10输入法默认为英文输入(需要注销或重启计算机一次)
Local $Win10CH_EN = RegRead("HKEY_CURRENT_USER64\SOFTWARE\Microsoft\InputMethod\Settings\CHS", "Default Mode") ;Win10中英文输入默认键值
If $Win10CH_EN <> 1 Then
RegWrite("HKEY_CURRENT_USER64\SOFTWARE\Microsoft\InputMethod\Settings\CHS", "Default Mode", "REG_DWORD", "1")
;RegWrite("HKEY_CURRENT_USER64\SOFTWARE\Microsoft\InputMethod\Settings\CHS", "Enable Cloud Candidate", "REG_DWORD", "0") ;关闭输入云计算
EndIf
WinActivate("TIM") ;激活登录窗口
ControlClick("TIM", "", "", "left", 3, 262, 280) ;3击账号框修改账号
Sleep(500)
ControlSend("TIM", "", "", "1234567") ;ControlSend函数输入QQ号正常
;Send("1234567",1)
ControlClick("TIM", "", "", "left", 3, 263, 305) ;3击密码框
Sleep(500)
;ControlSend("TIM", "", "Edit1", "1234567",1);ControlSend函数这样可以输入,但登录提示密码错误?
Send("1234567", 1) ;这样输入就能登录,问题在哪儿?高手有空试试。。。
;ControlClick("TIM", "", "", "left", 1, 263, 372);点击登陆
;Exit
|