麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 編程 > 易語言 > 正文

易語言實現PC端登陸微信的代碼

2024-07-21 23:02:48
字體:
來源:轉載
供稿:網友

DLL命令表

.版本 2.DLL命令 timeGetTime, 長整數型, "winmm.dll", "timeGetTime".DLL命令 GetLocalTime, , "kernel32", "GetLocalTime"  .參數 時間格式, 系統時間_

全局變量表

.版本 2.全局變量 scan, 文本型.全局變量 ticket, 文本型.全局變量 r, 文本型.全局變量 tid, 文本型

常量數據表

.版本 2.常量 常量1, "<文本長度: 50>", , window.QRLogin.code = 200; window.QRLogin.uuid = ".常量 常量2, "<文本長度: 97>", , BaseRequest:{DeviceID:”x”,Sid: “xx”,Skey: “xxx”,Uin: “xxxx”,}.常量 常量3, "<文本長度: 72>", , {"BaseRequest":{"Uin":"UIN","Sid":"SID","Skey":"SKEY","DeviceID":"E"}}

自定義數據類型表

.版本 2.數據類型 系統時間_, , SYSTEMTIME  .成員 年, 短整數型, , , wYear  .成員 月, 短整數型, , , wMonth  .成員 星期, 短整數型, , , wDayOfWeek  .成員 日, 短整數型, , , wDay  .成員 小時, 短整數型, , , wHour  .成員 分, 短整數型, , , wMinute  .成員 秒, 短整數型, , , wSecond  .成員 毫秒, 短整數型, , , wMilliseconds

系統時間

.版本 2.程序集 程序集1.子程序 時間, 文本型.局部變量 時間b, 系統時間_GetLocalTime (時間b)返回 (到文本 (時間b.年) + “-” + 到文本 (時間b.月) + “-” + 到文本 (時間b.日) + “ ” + 取文本右邊 (到文本 (時間b.星期 + 100), 2) + “ ” + 到文本 (時間b.小時) + “:” + 到文本 (時間b.分) + “:” + 到文本 (時間b.秒) + “.” + 到文本 (時間b.毫秒))

PC端微信登陸的代碼

此功能需要加載精易模塊5.6

.版本 2.支持庫 internet.支持庫 spec.支持庫 EThread.程序集 窗口程序集_啟動窗口.程序集變量 bid, 文本型.程序集變量 Cookies, 文本型.程序集變量 skey, 文本型.程序集變量 sid, 文本型.程序集變量 uin, 文本型.程序集變量 源碼, 文本型.程序集變量 新源碼, 文本型.程序集變量 pass_ticket, 文本型.程序集變量 url, 文本型.子程序 __啟動窗口_創建完畢tid = “https://login.weixin.qq.com/jslogin?appid=wx782c26e4c19acffb&redirect_uri=https%3A%2F%2Fwx.qq.com%2Fcgi-bin%2Fmmwebwx-in%2Fwebwxnewloginpage&fun=new&lang=zh_CN”源碼 = 網頁_訪問S (tid)bid = 文本_取出中間文本 (源碼, #常量1, #引號)圖片框1.圖片 = HTTP讀文件 (“https://login.weixin.qq.com/qrcode/” + bid)時鐘1.時鐘周期 = 1000.子程序 _時鐘1_周期事件.局部變量 心, 文本型.局部變量 文本, 文本型.局部變量 狀態碼, 文本型.局部變量 句柄, 整數型心 = 網頁_訪問S (“https://login.weixin.qq.com/cgi-bin/mmwebwx-bin/login?uuid=” + bid + “&tip=1&_=” + 時間 (), , , , Cookies)文本 = 文本_取出中間文本 (心, “code=”, “;”).如果真 (文本 = “201”)  狀態碼 = 文本_取出中間文本 (心, “code=”, “;”)  _啟動窗口.標題 = “已掃描,未登錄!”.如果真結束.如果真 (文本 = “200”)  url = 文本_取出中間文本 (心, #引號, #引號)  ticket = 文本_取出中間文本 (url, “ticket=”, “@”)  scan = 文本_取右邊 (url, “scan=”, )  時鐘1.時鐘周期 = 0  調試輸出 (url)  _啟動窗口.標題 = “已登錄!”  信息框 (“測試成功”, 0, )  啟動線程 (&處理, , 句柄).如果真結束.如果真 (文本 = “408”)  tid = “https://login.weixin.qq.com/jslogin?appid=wx782c26e4c19acffb&redirect_uri=https%3A%2F%2Fwx.qq.com%2Fcgi-bin%2Fmmwebwx-in%2Fwebwxnewloginpage&fun=new&lang=zh_CN”  源碼 = 網頁_訪問S (tid)  bid = 文本_取出中間文本 (源碼, #常量1, #引號)  圖片框1.圖片 = HTTP讀文件 (“https://login.weixin.qq.com/qrcode/” + bid).如果真結束調試輸出 (文本).子程序 處理.局部變量 源代碼, 文本型.局部變量 源代碼1, 文本型.局部變量 狀態碼, 文本型.局部變量 文本, 文本型.局部變量 e, 文本型.局部變量 代源碼2, 文本型時鐘1.時鐘周期 = 0源代碼 = 網頁_訪問S (url + “&fun=new&version=v2”)狀態碼 = 文本_取出中間文本 (源代碼, “<error><ret>”, “</ret><message></message>”).如果真 (狀態碼 = “408”)  信息框 (“未知錯誤!”, 0, ).如果真結束skey = 文本_取出中間文本 (源代碼, “<skey>”, “</skey>”)sid = 文本_取出中間文本 (源代碼, “<wxsid>”, “</wxsid>”)uin = 文本_取出中間文本 (源代碼, “<wxuin>”, “</wxuin>”)pass_ticket = 文本_取出中間文本 (源代碼, “<pass_ticket>”, “</pass_ticket>”)r = 到文本 (時間_到時間戳 (取現行時間 (), ))調試輸出 (skey, sid, uin, pass_ticket, r)

運行結果:

易語言,微信,pc端,登陸

總結

以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對VeVb武林網的支持。


注:相關教程知識閱讀請移步到易語言教程頻道。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 天天夜夜草 | 视频一区国产精品 | 中文字幕在线观看精品 | 国产成人精品无人区一区 | 色综合久久久久久久久久久 | 成人午夜激情视频 | 狠狠久久伊人中文字幕 | 99re色| 看免费黄色一级片 | 国产亚洲精品综合一区 | 久久国产精品二区 | 国产一区二区影视 | 日本精品中文字幕 | 毛片国产 | 黄色大片免费看 | 91 免费看片 | 久久精品女人天堂av | 91中文字幕在线观看 | 999久久国精品免费观看网站 | 国产一区二区三区手机在线 | 一级裸体视频 | 久久久久久久99 | 91av在线影院 | 国产九色在线播放九色 | 亚州精品国产 | 亚州精品天堂中文字幕 | 久久毛片免费观看 | 美女污污视频在线观看 | 久色成人 | 国产在线观看免费视频软件 | 精品一区久久久 | 欧美自拍三区 | 美女污污在线观看 | 视频一区二区久久 | av噜噜在线 | 亚洲日韩中文字幕一区 | 欧美日韩大片在线观看 | 黄色片网站在线播放 | 亚洲精品3 | 毛片免费大全短视频 | 国产女厕一区二区三区在线视 |