如何用vbs自動登錄qq
時間:
潔雄1007由 分享
如何用vbs自動登錄qq?怎樣制作一個VBS腳本讓QQ自動登陸呢?下面這個代碼,只要換下QQ安裝路徑,QQ號和密碼就能使用了。
vbs自動登錄qq步驟
新建一個文本文檔。
輸入下列代碼。
Dim Program1
Program1= "QQ路徑"
Set WshShell=createobject("wscript.shell")
Set oExec=WshShell.Exec(Program1)
WScript.Sleep 3000
WshShell.AppActivate "cncn"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "QQ號"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "密碼"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
然后點擊“文件”——“另存為”。
選擇保存路徑及輸入文件名“QQ自動登陸.vbs”,保存。
然后雙擊運行該文件,即可自動登錄QQ。