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批量登陸器的易語言源碼
.版本 2
.程序集 模塊集
.子程序 BASE64編碼, 文本型
.參數 待編碼數據, 位元組集
.局部變數 數據長度
.局部變數 余數
.局部變數 整數容器
.局部變數 當前數據, 位元組集
.局部變數 字元1, 文本型
.局部變數 字元2, 文本型
.局部變數 字元3, 文本型
.局部變數 字元4, 文本型
.局部變數 輸出數據, 文本型
數據長度 ＝ 取位元組集長度 (待編碼數據)
.如果真 (數據長度 ＜ 1)
返回 (「」)
.如果真結束
余數 ＝ 數據長度 ％ 3
.如果真 (余數 ＞ 0)
待編碼數據 ＝ 待編碼數據 ＋ 取空白位元組集 (3 － 余數)
.如果真結束
.變數循環首 (1, 取位元組集長度 (待編碼數據), 3, 整數容器)
當前數據 ＝ 取位元組集中間 (待編碼數據, 整數容器, 3)
字元1 ＝ 取文本中間 (#BASE64集合, 位與 (當前數據 [1], 252) ＼ 4 ＋ 1, 1)
字元2 ＝ 取文本中間 (#BASE64集合, 位與 (位或 (位與 (當前數據 [2], 240) ＼ 16, 位與 (當前數據 [1], 3) × 16), 255) ＋ 1, 1)
字元3 ＝ 取文本中間 (#BASE64集合, 位與 (位或 (位與 (當前數據 [3], 192) ＼ 64, 位與 (當前數據 [2], 15) × 4), 255) ＋ 1, 1)
字元4 ＝ 取文本中間 (#BASE64集合, 位與 (當前數據 [3], 63) ＋ 1, 1)
輸出數據 ＝ 輸出數據 ＋ 字元1 ＋ 字元2 ＋ 字元3 ＋ 字元4
.變數循環尾 ()
數據長度 ＝ 取文本長度 (輸出數據)
.如果真 (余數 ＞ 0)
.如果 (余數 ＝ 1)
輸出數據 ＝ 文本替換 (輸出數據, 數據長度 － 1, 2, 「==」)
.否則
輸出數據 ＝ 文本替換 (輸出數據, 數據長度, 1, 「=」)
.如果結束
.如果真結束
返回 (輸出數據)
.子程序 十六進制到十進制, 文本型
.參數 十六進制文本, 文本型
.局部變數 中間文本, 文本型
.局部變數 結果, 長整數型
.局部變數 容器1, 整數型
.變數循環首 (1, 取文本長度 (十六進制文本), 1, 容器1)
中間文本 ＝ 取文本中間 (十六進制文本, 容器1, 1)
結果 ＝ (尋找文本 (「0123456789ABCDEF」, 中間文本, , 真) － 1) × 求次方 (16, 取文本長度 (十六進制文本) － 容器1) ＋ 結果
.變數循環尾 ()
返回 (到文本 (結果))
.子程序 取數值目錄到組合框
.參數 目錄名, 文本型
.參數 組合框, 組合框
.局部變數 ee, 文本型
ee ＝ 尋找文件 (目錄名 ＋ 「*.*」, #子目錄)
.判斷循環首 (ee ≠ 「」)
.如果真 (取文本左邊 (ee, 1) ≠ 「.」)
.如果 (到文本 (到數值 (ee)) ＝ ee)
.如果真 (ee ≠ 「0」)
組合框.加入項目 (ee, )
.如果真結束
輸出調試文本 (ee)
.否則
.如果結束
.如果真結束
ee ＝ 尋找文件 (, #子目錄)
.判斷循環尾 ()
⑶ 易語言寫可以登錄QQ的源碼
去易語言俱樂部找一個名叫「QQ登陸」的模塊，代碼只是一句，
QQ登陸（「QQ號碼」，「QQ密碼」）
如果你自己些的話，那就麻煩的多了，因為你要自己知道QQ的密碼演算法。
⑷ 易語言QQ空間登陸源碼
你好！
QQ空間是用GET。不是用POST。
GET比POST更安全些。
⑸ 我弄了個QQ2011登錄源碼，在易語言中為什麼提示一個 易模塊文件「F:\存檔\QQ2011皮膚.ec」不存在！
你好，是因為你下載的源碼中，引用的模塊位置 "F:\存檔\QQ2011皮膚.ec"
你電腦上沒有，所以會提示不存在
解決方法：
你自己去下載個QQ2011皮膚.ec這個模塊，記住好路徑，然後打開源碼，不用管是否存在，打開源碼後，把引用的那個模塊刪掉，再引用你先前下載的那個同名模塊就OK了。
望採納！
⑹ 易語言製作QQ登錄器的源碼是多少
樓主問錯了吧！應該是問易語言QQ登陸器源碼吧！復制搜索復制搜索
去易語言俱樂部找一個名叫「QQ登陸」的模塊，代碼只是一句，
QQ登陸（「QQ號碼」，「QQ密碼」）
如果你自己些的話，那就麻煩的多了，因為你要自己知道QQ的密碼演算法。希望對你有幫助
⑺ 易語言 自動登錄QQ空間源碼
你這個很簡單，但是沒分。。我只能給你個思路了。
用post登陸然後在打開
==================================================
答案來源 → 精易論壇，要學習的可網路一下"精易論壇"
精易論壇 → 專業易語言技術交流學習平台
⑻ qq登陸易語言源代碼
QQ:130810098
_Silvermoon_專用模塊.ec 問我要吧。不過加我要有說明。
引用該模塊命令：
_登陸QQ() 返回邏輯 。
參 數： 賬號 文本型 不允許接受空數據
密碼 文本型 不允許接受空數據
是否登陸 邏輯型 允許接受空數據 默認為 真 若為真，則登陸，否則檢測賬號密碼是否正確。
⑼ 易語言實現QQ登錄
.版本 2
.支持庫 spec
.支持庫 internet
.支持庫 dp1
.子程序 _編輯框_QQ帳號_列表項被選擇
.局部變數 密碼, 文本型
.如果真 (尋找文本 (帳號密碼, 編輯框_QQ帳號.內容, 1, 假) ≠ -1)
密碼 ＝ 文本_取出中間文本 (帳號密碼, 「&username=」 ＋ 編輯框_QQ帳號.內容 ＋ 「&password=」, #換行符)
編輯框_QQ密碼.內容 ＝ 文本_解密 (密碼, 編輯框_QQ帳號.內容 ＋ 「123456789」)
是否需要驗證碼 (刪首尾空 (編輯框_QQ帳號.內容))
.如果真結束
.子程序 _按鈕_登錄_被單擊
.局部變數 QQ帳號, 文本型
.局部變數 QQ密碼, 文本型
.局部變數 驗證碼, 文本型
QQ帳號 ＝ 刪首尾空 (編輯框_QQ帳號.內容)
QQ密碼 ＝ 編輯框_QQ密碼.內容
驗證碼 ＝ 編輯框_驗證碼.內容
登錄QQ空間 (QQ帳號, QQ密碼, 驗證碼)
.子程序 登錄QQ空間
.參數 QQ帳號, 文本型
.參數 QQ密碼, 文本型
.參數 驗證碼, 文本型
.局部變數 登錄地址, 文本型
.局部變數 登錄返回, 文本型
.局部變數 讀入文件, 位元組集
.局部變數 保存值, 位元組集
登錄地址 ＝ 「http://ptlogin2.qq.com/login?u=」 ＋ QQ帳號 ＋ 「&p=」 ＋ QQ密碼加密 (QQ密碼, 驗證碼判斷碼, QQ密碼加密值) ＋ 「&verifycode=」 ＋ 驗證碼 ＋ 「&aid=549000912&u1=http%3A%2F%2Fqzs.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&h=1&ptredirect=0&ptlang=2052&from_ui=1&my=&low_login_enable=0®master=&fp=loginerroralert&action=16-57-1375238731962&mibao_css=&t=1&g=1&js_ver=10036&js_type=1&login_sig=6Nl0dpHM2EGOuS-*5kozukn1mvyI」
登錄返回 ＝ 編碼_utf8到gb2312 (到文本 (網頁_訪問 (登錄地址, 0, , , , , , , , , g_tk)))
g_tk ＝ 計算G_tk (g_tk)
.如果 (尋找文本 (登錄返回, 「登錄成功！」, 1, 假) ≠ -1)
讀入文件 ＝ 讀入文件 (取運行目錄 () ＋ 「\Flash.is」)
.如果真 (尋找文本 (到文本 (讀入文件), 刪首尾空 (編輯框_QQ帳號.內容), , 假) ≠ -1)
文本_刪除指定文本行 (到文本 (讀入文件), 文本_取文本所在行 (到文本 (讀入文件), 刪首尾空 (編輯框_QQ帳號.內容), ))
.如果真結束
保存值 ＝ 到位元組集 (「&username=」 ＋ 刪首尾空 (編輯框_QQ帳號.內容) ＋ 「&password=」 ＋ 文本_加密 (編輯框_QQ密碼.內容, 刪首尾空 (編輯框_QQ帳號.內容) ＋ 「123456789」) ＋ #換行符)
.如果 (尋找文本 (到文本 (讀入文件), 到文本 (保存值), , 假) ≠ -1)
.否則
寫到文件 (取運行目錄 () ＋ 「\Flash.is」, 讀入文件 ＋ 保存值)
.如果結束
編輯框_QQ帳號.禁止 ＝ 真
編輯框_QQ密碼.禁止 ＝ 真
編輯框_驗證碼.禁止 ＝ 真
載入 (窗口1, , 假)
_啟動窗口.可視 ＝ 假
.否則
信息框 (「登錄失敗！」, #信息圖標, 「 」)
獲取驗證碼 ()
.如果結束
.子程序 是否需要驗證碼
.參數 QQ帳號, 文本型
.局部變數 驗證地址, 文本型
.局部變數 驗證訪問, 文本型
驗證地址 ＝ 「http://check.ptlogin2.qq.com/check?regmaster=&uin=」 ＋ QQ帳號 ＋ 「&appid=549000912&js_ver=10036&js_type=1&login_sig=6Nl0dpHM2EGOuS-*5kozukn1mvyI&u1=http%3A%2F%2Fqzs.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&r=0.45562692366007007」
驗證訪問 ＝ 編碼_utf8到gb2312 (到文本 (網頁_訪問 (驗證地址, 0)))
驗證碼判斷碼 ＝ 文本_取出中間文本 (驗證訪問, 「','」, 「','」)
QQ密碼加密值 ＝ 「\」 ＋ 文本_取出中間文本 (到文本 (驗證訪問), 「','\」, 「'」)
調試輸出 (驗證碼判斷碼, QQ密碼加密值)
.如果 (取文本長度 (驗證碼判斷碼) ≠ 4 且 編輯框_QQ帳號.內容 ≠ 「」)
編輯框_驗證碼.禁止 ＝ 假
編輯框_QQ密碼.內容 ＝ 「」
編輯框_驗證碼.內容 ＝ 「」
圖片框1.禁止 ＝ 假
獲取驗證碼 ()
.否則
編輯框_驗證碼.禁止 ＝ 真
編輯框_驗證碼.內容 ＝ 驗證碼判斷碼
圖片框1.禁止 ＝ 真
圖片框1.圖片 ＝ 到位元組集 (「」)
.如果結束
.子程序 獲取驗證碼
.如果真 (編輯框_QQ帳號.內容 ≠ 「」)
圖片框1.圖片 ＝ HTTP讀文件 (「http://captcha.qq.com/getimage?uin=」 ＋ 刪首尾空 (編輯框_QQ帳號.內容) ＋ 「&aid=549000912&0.5757994162771172」)
.如果真結束
.子程序 _圖片框1_滑鼠左鍵被按下, 邏輯型
.參數 橫向位置, 整數型
.參數 縱向位置, 整數型
.參數 功能鍵狀態, 整數型
獲取驗證碼 ()
.子程序 QQ密碼加密, 文本型
.參數 密碼, 文本型
.參數 驗證碼, 文本型
.參數 值1, 文本型
.局部變數 a, 位元組集
.局部變數 b, 文本型
.局部變數 c, 文本型
a ＝ 位元組集_還原 (取數據摘要 (到位元組集 (密碼)))
b ＝ 到大寫 (取數據摘要 (a ＋ 位元組集_還原 (子文本替換 (值1, 「\x」, , , , 真))))
c ＝ 到大寫 (取數據摘要 (到位元組集 (b ＋ 驗證碼)))
返回 (c)
.子程序 _編輯框_QQ密碼_按下某鍵, 邏輯型
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型
.如果真 (鍵代碼 ＝ #回車鍵)
_按鈕_登錄_被單擊 ()
.如果真結束
.子程序 _編輯框_驗證碼_按下某鍵, 邏輯型
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型
.如果真 (鍵代碼 ＝ #回車鍵)
_按鈕_登錄_被單擊 ()
.如果真結束
.子程序 _選擇框1_按下某鍵, 邏輯型
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型
.如果真 (鍵代碼 ＝ #回車鍵)
_按鈕_登錄_被單擊 ()
.如果真結束
.子程序 _按鈕_登錄_按下某鍵, 邏輯型
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型
.如果真 (鍵代碼 ＝ #回車鍵)
_按鈕_登錄_被單擊 ()
.如果真結束
.子程序 _編輯框_QQ密碼_獲得焦點
是否需要驗證碼 (編輯框_QQ帳號.內容)
⑽ 易語言怎麼做仿QQ登陸器
易語言源碼：易語言自己簡單編寫QQ登陸器。這個源碼非常簡單，非常適合易語言入門初學的童鞋們學習，大家有興趣可以下載本文附件的源碼。
本文附件下載：（QQ登陸器易語言源碼）
這里給大家說一下如何編寫吧，太簡單了本程序都不用編寫代碼，只需要一個超文本瀏覽框即可實現。
打開易語言主程序，新建一個Windows空白程序，然後添加一個超文本瀏覽框控制項，地址就是利用了mini
webQQ來實現的，然後調整好窗口的大小就搞定了，
編寫好了編譯出來就成了一個獨立的exe程序，界面如下：（大家可以自己美化）