如何用vbs自動(dòng)登錄qq?怎樣制作一個(gè)VBS腳本讓QQ自動(dòng)登陸呢?下面這個(gè)代碼，只要換下QQ安裝路徑，QQ號(hào)和密碼就能使用了。

　　vbs自動(dòng)登錄qq步驟

　　新建一個(gè)文本文檔。

　　輸入下列代碼。

　　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號(hào)"

　　WScript.Sleep 200

　　WshShell.SendKeys "{TAB}"

　　WshShell.SendKeys "密碼"

　　WScript.Sleep 200

　　WshShell.SendKeys "{ENTER}"

　　然后點(diǎn)擊“文件”——“另存為”。

　　選擇保存路徑及輸入文件名“QQ自動(dòng)登陸.vbs”，保存。

　　然后雙擊運(yùn)行該文件，即可自動(dòng)登錄QQ。