自动登录qq邮箱脚本
‘壹’ 求自动登录qq脚本
Dim WshShell, QQPath, QQselect
QQPath="D:\software\qq\QQ.exe" 'QQ所在路径
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2500
WshShell.AppActivate "QQ用户登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "¥¥¥¥¥¥" 'qq号
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "¥¥¥¥¥¥¥'密码
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
‘贰’ 用C语言或C++写一个QQ自动登陆器
建议楼主改用 AutoIt、按键精灵、易语言……
Let's AutoIt 基础语法, 关键还是 得多看帮助文档
例如 我自己用的登陆qq的脚本
ShellExecute("F:\Program Files\Tencent\QQ2011beta\Bin\QQ.exe")
While Not WinExists("QQ2011")
Sleep(1000)
WEnd
TrayTip("正在登陆QQ", "请稍候...", 3, 1)
Sleep(2000)
WinActivate("QQ2011")
Sleep(500)
Opt("MouseCoordMode", 2)
MouseClick("left", 180, 145)
Send("^A")
Send("622053851")
MouseClick("left", 180, 180)
Send("^A")
Send("")
Send("{ENTER}")