qq自動登錄腳本
㈠ 易語言怎樣編寫QQ自動登錄
直接下一個按鍵精靈就能完成樓主的要求了
按鍵精靈8是最新版
樓主你最起碼給點分吧
按鍵精靈和vb一樣（差不了太多）
這是我很久以前寫的代碼
代碼
---------------------------------------------
//判斷文件是否存在如果存在將在下次運行無需手動輸入賬號以及密碼!
aa = Plugin.File.IsFileExit("c:\c.txt")
If aa = true then
Call haha
Else
k=inputbox("QQ路徑:",麥兜Terran)
y= inputbox("用戶名:",麥兜Terran)
m= inputbox("密碼:",麥兜Terran)
//創建一個文件,作為記錄
RunApp "cmd /c cd.>c:\c.txt&",0
Call Plugin.File.WriteFileEx("c:\c.txt", y)
Call Plugin.File.WriteFileEx("c:\c.txt", m)
Call Plugin.File.WriteFileEx("c:\c.txt", k)
Call haha
End if
//開始工作
Sub haha
l = Plugin.File.ReadFileEx("c:\c.txt")
x = Split(l,"|")
RunApp x(2)
KeyPress 9,9
SayString x(0)
KeyPress 9,1
SayString x(1)
KeyPress 9,5
KeyPress 13,1
End Sub
㈡ 求QQ一鍵登陸 QQ網吧那個網頁的腳本、批處理。達到自動輸帳號密碼就行。
不需要腳本的，你只要在電腦或手機的QQ主界面上把記住密碼和自動登錄都點上對號就可以了，以後你點QQ就自動登錄了
㈢ 用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}")
㈣ QQ上線登陸器的自助VBS登陸腳本
Dim Program1
Program1= QQ所在目錄（要包含QQ.EXE）
Set WshShell=createobject(wscript.shell)
Set oExec=WshShell.Exec(Program1)
WScript.Sleep 3000
WshShell.AppActivate 這里隨便打
WshShell.SendKeys +{TAB}
WshShell.SendKeys 要登陸的帳號
WScript.Sleep 200
WshShell.SendKeys {TAB}
WshShell.SendKeys 對應的密碼
WScript.Sleep 200
WshShell.SendKeys {ENTER}
將此腳本保存為.vbs便大功告成了！
只要運行腳本就會自動打開並登陸QQ！不過由於是明文保存，所以存在泄漏密碼的可能！如果有能力的可以製造腳本用來創建這個腳本，這樣你就可以對帳號密碼進行可逆加密了。不過對於即不會輸出腳本有害怕泄漏的人還有一個特別的辦法。只是將密碼處變成一個變數，然後用指令彈出對話框手動輸入下密碼就可以了。不過有種多此一舉的感覺，我也就不改腳本了。
PS:此腳本收集自網路除注釋外無變更。
㈤ 用vbs腳本使QQ自動登入
你在展示自己的才能嗎？這是一個爆露狂的行為，你的賬號和密碼，無疑全問向黑客展示出來了。
WshShell.AppActivate "QQ登錄" '萬一QQ登錄窗口出現的慢了，長於2秒，你就可能把這些賬號密碼，填寫在記事本中。
sendkeys "~" 就可以了。寫代碼太煩索。
㈥ 跪求一個按鍵精靈腳本要求：自動登陸txt文本內的QQ，文本格式類似QQ號碼----QQ密碼。
直接寫前台，手的操作用按鍵精靈代替，思路是打開qq，得到輸入框的位置，讀取文本復制粘貼。
http://zy.anjian.com/?action-model-name-qmdn-itemid-229
http://zy.anjian.com/index.php?action-viewthread-tid-356604
這里有例子，綜合一下就好了
㈦ 怎樣用批處理設置自動登錄QQ
Dim strPrgpth
strPrgpth = "c:\pro\qq\bin\qq.exe" '如果QQ安裝路徑不同，在此處修改
Set wshshell = CreateObject("wscript.shell")
Set oexec = wshshell.exec(strPrgpth)
wscript.sleep 3000 '如果腳本無法工作，可以適當延長這部分的時間值
wshshell.AppActivate "QQ用戶登錄"
wshshell.Sendkeys "{TAB}"
wshshell.Sendkeys "111111" '換成你自己的QQ號
wscript.Sleep 1000
wshshell.Sendkeys "{TAB}"
wscript.Sleep 1000
wshshell.Sendkeys "111111" '換成你的QQ號密碼
wscript.Sleep 1000
wshshell.Sendkeys "{ENTER}"
wscript.Quit
保存為vbs格式
無語，還不夠清楚啊，我都沒法再說了，在有注釋的行，把你qq的安裝路徑、號碼、密碼填上就行了
㈧ 如何設置一鍵登錄QQ
讓我的QQ能一鍵登錄 《電腦報》的第30期的G9版《DIY屬於自己的QQ登錄器》一文中介紹了如何雙擊一個vbs文件就可以讓QQ自動登錄的方法。今天，我們再補充並優化一下其代碼，只需輕輕按一個鍵，就能實現QQ的自動登錄。首先新建一個記事本並輸入： Dim Program1 Program1= "C:\Program Files\Ten cent\QQ\QQ.exe" 'QQ路徑 Set WshShell=createobject("wscri pt.shell") Set oExec=WshShell.Exec(Progra m1) WScript.Sleep 2000 WshShell.AppActivate "Q登錄" WshShell.SendKeys "+{TAB}" WshShell.SendKeys "123456"'QQ號碼 WScript.Sleep 200 WshShell.SendKeys "{TAB}" WshShell.SendKeys "123" 'QQ密碼 WScript.Sleep 200 WshShell.SendKeys "{ENTER}" 然後將此文件的後綴名改為「.vbs」，再對著它點擊「右鍵→發送到→桌面快捷方式」最後對著這個快捷方式點擊「右鍵→屬性」在「快捷鍵」中設置為F9鍵。要登錄QQ時，只須用手指輕輕點一下F9鍵，就能自動登錄QQ，很方便吧！ 本文涉及的代碼可到： http://www.cpcw.com/xz/loginQQ.rar下載，然後用記事本打開按實際情況填寫好QQ路徑、QQ號碼和密碼即可使用。
㈨ QQ自動登陸腳本會編VB的來
用VBS吧。存為vbs文件，拖到啟動項目：
set ws=wscript.Createobject("wscript.shell")
ws.run "E:\Software\Post\QQ\QQ.exe"
wscript.sleep 5000
ws.sendkeys "^`"
wscript.quit
注意把你QQ路徑改掉，5000是啟動5秒後再執行按鍵「^`」，^表示Ctrl