一区二区三区在线-一区二区三区亚洲视频-一区二区三区亚洲-一区二区三区午夜-一区二区三区四区在线视频-一区二区三区四区在线免费观看

服務器之家:專注于服務器技術及軟件下載分享
分類導航

PHP教程|ASP.NET教程|Java教程|ASP教程|編程技術|正則表達式|C/C++|IOS|C#|Swift|Android|VB|R語言|JavaScript|易語言|vb.net|

服務器之家 - 編程語言 - 易語言 - 易語言實現(xiàn)PC端登陸微信的代碼

易語言實現(xiàn)PC端登陸微信的代碼

2022-02-21 16:24易語言源碼貝貝吧 易語言

今天小編就為大家分享一篇關于易語言實現(xiàn)PC端登陸微信的代碼,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

DLL命令表

?
1
2
3
4
.版本 2
.DLL命令 timeGetTime, 長整數(shù)型, "winmm.dll", "timeGetTime"
.DLL命令 GetLocalTime, , "kernel32", "GetLocalTime"
  .參數(shù) 時間格式, 系統(tǒng)時間_

全局變量表

?
1
2
3
4
5
.版本 2
.全局變量 scan, 文本型
.全局變量 ticket, 文本型
.全局變量 r, 文本型
.全局變量 tid, 文本型

常量數(shù)據(jù)表

?
1
2
3
4
.版本 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"}}

自定義數(shù)據(jù)類型表

?
1
2
3
4
5
6
7
8
9
10
.版本 2
.數(shù)據(jù)類型 系統(tǒng)時間_, , SYSTEMTIME
  .成員 年, 短整數(shù)型, , , wYear
  .成員 月, 短整數(shù)型, , , wMonth
  .成員 星期, 短整數(shù)型, , , wDayOfWeek
  .成員 日, 短整數(shù)型, , , wDay
  .成員 小時, 短整數(shù)型, , , wHour
  .成員 分, 短整數(shù)型, , , wMinute
  .成員 秒, 短整數(shù)型, , , wSecond
  .成員 毫秒, 短整數(shù)型, , , wMilliseconds

系統(tǒng)時間

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

PC端微信登陸的代碼

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

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
.版本 2
.支持庫 internet
.支持庫 spec
.支持庫 EThread
.程序集 窗口程序集_啟動窗口
.程序集變量 bid, 文本型
.程序集變量 Cookies, 文本型
.程序集變量 skey, 文本型
.程序集變量 sid, 文本型
.程序集變量 uin, 文本型
.程序集變量 源碼, 文本型
.程序集變量 新源碼, 文本型
.程序集變量 pass_ticket, 文本型
.程序集變量 url, 文本型
.子程序 __啟動窗口_創(chuàng)建完畢
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”
源碼 = 網(wǎng)頁_訪問S (tid)
bid = 文本_取出中間文本 (源碼, #常量1, #引號)
圖片框1.圖片 = HTTP讀文件 (“https://login.weixin.qq.com/qrcode/” + bid)
時鐘1.時鐘周期 = 1000
.子程序 _時鐘1_周期事件
.局部變量 心, 文本型
.局部變量 文本, 文本型
.局部變量 狀態(tài)碼, 文本型
.局部變量 句柄, 整數(shù)型
心 = 網(wǎng)頁_訪問S (“https://login.weixin.qq.com/cgi-bin/mmwebwx-bin/login?uuid=” + bid + “&tip=1&_=” + 時間 (), , , , Cookies)
文本 = 文本_取出中間文本 (心, “code=”, “;”)
.如果真 (文本 = “201”)
  狀態(tài)碼 = 文本_取出中間文本 (心, “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”
  源碼 = 網(wǎng)頁_訪問S (tid)
  bid = 文本_取出中間文本 (源碼, #常量1, #引號)
  圖片框1.圖片 = HTTP讀文件 (“https://login.weixin.qq.com/qrcode/” + bid)
.如果真結束
調試輸出 (文本)
.子程序 處理
.局部變量 源代碼, 文本型
.局部變量 源代碼1, 文本型
.局部變量 狀態(tài)碼, 文本型
.局部變量 文本, 文本型
.局部變量 e, 文本型
.局部變量 代源碼2, 文本型
時鐘1.時鐘周期 = 0
源代碼 = 網(wǎng)頁_訪問S (url + “&fun=new&version=v2”)
狀態(tài)碼 = 文本_取出中間文本 (源代碼, “<error><ret>”, “</ret><message></message>”)
.如果真 (狀態(tài)碼 = “408”)
  信息框 (“未知錯誤!”, 0, )
.如果真結束
skey = 文本_取出中間文本 (源代碼, “<skey>”, “</skey>”)
sid = 文本_取出中間文本 (源代碼, “<wxsid>”, “</wxsid>”)
uin = 文本_取出中間文本 (源代碼, “<wxuin>”, “</wxuin>”)
pass_ticket = 文本_取出中間文本 (源代碼, “<pass_ticket>”, “</pass_ticket>”)
r = 到文本 (時間_到時間戳 (取現(xiàn)行時間 (), ))
調試輸出 (skey, sid, uin, pass_ticket, r)

運行結果:

易語言實現(xiàn)PC端登陸微信的代碼

總結

以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接

延伸 · 閱讀

精彩推薦
  • 易語言易語言設置進度條邊框樣式的方法

    易語言設置進度條邊框樣式的方法

    今天小編就為大家分享一篇關于易語言設置進度條邊框樣式的方法,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨...

    易語言幫助手冊4422022-01-20
  • 易語言易語言生成exe文件的方法

    易語言生成exe文件的方法

    在本篇內容中小編給大家分享的是關于易語言生成exe文件的方法知識點,需要的朋友們參考下。...

    易語言教程網(wǎng)14792022-03-01
  • 易語言易語言在畫板中寫出指定文本當畫板中已滿會自動滾屏

    易語言在畫板中寫出指定文本當畫板中已滿會自動滾屏

    今天小編就為大家分享一篇關于易語言在畫板中寫出指定文本當畫板中已滿會自動滾屏,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,...

    易語言幫助手冊9092022-01-12
  • 易語言一步一步跟我學易語言之第二個易程序菜單設計

    一步一步跟我學易語言之第二個易程序菜單設計

    今天小編就為大家分享一篇關于的一步一步跟我學易語言之第二個易程序菜單設計,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要...

    易語言幫助手冊7092021-06-17
  • 易語言一步一步跟我學易語言之關于變量

    一步一步跟我學易語言之關于變量

    今天小編就為大家分享一篇關于一步一步跟我學易語言之關于變量,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨...

    易語言幫助手冊10822021-06-17
  • 易語言易語言獲取指定磁盤的名稱

    易語言獲取指定磁盤的名稱

    今天小編就為大家分享一篇關于易語言獲取指定磁盤的名稱,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來...

    易語言幫助手冊12662022-01-04
  • 易語言易語言關于程序進程和線程的基礎知識

    易語言關于程序進程和線程的基礎知識

    今天小編就為大家分享一篇關于易語言關于程序進程和線程的基礎知識,小編覺得內容挺不錯的,現(xiàn)在分享給大家,具有很好的參考價值,需要的朋友一起...

    三葉資源網(wǎng)6662022-02-24
  • 易語言實例操作易語言載入窗口

    實例操作易語言載入窗口

    在本文中小編給大家整理的是關于易語言載入窗口的教程和步驟內容,需要的可以跟著學習下...

    易語言教程網(wǎng)19162022-03-02
主站蜘蛛池模板: 亚洲高清在线视频 | 国产情侣视频观看 | 青草青青在线视频 | 日韩网新片免费 | 爆操女友 | 亚洲人的天堂男人爽爽爽 | 免费国产高清精品一区在线 | 晚上禁用的十大黄台视频 | 天天综合网天天做天天受 | 久久这里只精品热在线18 | 成人网久久 | 国产真实伦对白在线播放 | 我被黑人彻底征服的全文 | 女子校生下媚药在线观看 | 国产成人综合一区精品 | 亚洲精品国产在线网站 | 日本人成动漫网站在线观看 | 国产精品最新资源网 | 国产视频播放 | 欧美日韩亚洲国内综合网香蕉 | 国产欧美一区二区精品性色 | 国产肥臀| 操碰人人 | 国产91页| 国产精品吹潮香蕉在线观看 | 2021久久 | 精品国产品香蕉在线观看75 | 青春草视频在线免费观看 | 日本特黄一级大片 | 亚洲欧美久久久久久久久久爽网站 | 久久久久久久国产精品视频 | 国产馆在线观看免费的 | 国产在线视频第一页 | 俄罗斯美女毛茸茸bbwbbw | 日本午夜vr影院新入口 | 国产精品久久久久久影视 | 91视频国产在线 | 国产欧美日韩在线不卡第一页 | 天堂成人在线视频 | 婷综合| 91制片厂制作果冻传媒123 |