【急】易語言，最難的題，高手速度，哈

版本2登錄返回臨時數據= Comet HTTP read file ("/login "，" post "，，" u 1 = % 2 fqzone % 2f toolbar % 2f log in succ . html % 3f para % 3d blog comment &；loginerroralert & amph=1。u = "+刪除前導空格和尾隨空格(組合框中的QQ帳號和內容)+" &；P = "+QQ密碼+" &；verify code = "+刪除前導和尾隨空格(編輯框驗證碼。內容)+" &；援助= 15000101 & amp；from_ui=1 "，)

If(尋找文本(to text(登錄後返回臨時數據)，“登錄成功”，false) > 0)

P =對文本(讀入文件(取運行目錄()+"/qq.dll "))

如果為真(找文字(P，組合框QQ賬號。內容，false) =-1)

如果(p = " ")

寫入文件(將運行目錄()+"/qq.dll "寫入字節集(組合框中qq帳戶的內容))

否則。

寫入壹個文件(取運行目錄()+"/qq.dll "到字節集(p+#換行符+組合框qq賬號。內容))

如果結束了

寫配置項(取運行目錄()+"/qqkey.dll "，" qqkey "，組合框中QQ賬號，RC4。加密(編輯QQ密碼，內容，“MD51029278686”)。

如果真的結束了。

寫配置項(取運行目錄()+"/qqkey.dll "，" qqkey "，組合框QQ賬號。內容，RC4。加密(編輯框QQ密碼。內容，" MD51029278686 "))時鐘1。時鐘周期= 0。

Load (Window _ Main，False)

皮膚()

_啟動窗口。銷毀()

否則。

消息框2(“登錄失敗，請檢查是否輸入正確！”)、#錯誤圖標、“錯誤”)

時鐘1。時鐘周期= 1。

編輯框驗證碼。內容= ' '

上一篇:筆記本可以用WiFi上網，但是如何解決不能用網線(無線路由器)上網的問題？

下一篇:怎麽用ai寫論文