微信扫码登录源码

.版本 2 .支持库 EThread .支持库 spec .程序集 窗口程序集_启动窗口 .程序集变量 uuid, 文本型 .程序集变量 shey, 文本型 .程序集变量 wxsid, 文本型 .程序集变量 pass_ticket, 文本型 .程序集变量 wxuin, 文本型 .子程序 _按钮1_被单击 图片框1.图片 = 取二维码 () 启动线程 (&扫码, , ) .子程序 取二维码, 字节集 .局部变量 源文件, 文本型 源文件 = 到文本 (网页_访问 (“https://login.wx.qq.com/jslogin?appid=wx782c26e4c19acffb&redirect_uri=https%3A%2F%2Fwx.qq.com%2Fcgi-bin%2Fmmwebwx-bin%2Fwebwxnewloginpage&fun=new&lang=zh_CN&_=” + 时间_取现行时间戳 ())) uuid = 文本_取出中间文本 (源文件, #常量1, #常量2) 调试输出 (uuid) 返回 (网页_访问 (“https://login.weixin.qq.com/qrcode/” + uuid)) .子程序 扫码 .局部变量 url, 文本型 .局部变量 源文件, 文本型 .局部变量 v, 文本型 .局部变量 ticket, 文本型 .局部变量 a, 文本型 url = “https://login.wx2.qq.com/cgi-bin/mmwebwx-bin/login?loginicon=true&uuid=” + uuid + “&tip=0&r=-1336304336&_=” + 时间_取现行时间戳 () 源文件 = 网页_访问S (url) 调试输出 (源文件) v = 源文件 .如果真 (寻找文本 (v, “window.code=200”, , 假) ≠ -1) 标签2.标题 = “登录成功!” .如果真结束 .判断开始 (寻找文本 (源文件, “ticket”, , 假) ≠ -1) ticket = 文本_取出中间文本 (源文件, “ticket=”, “&uuid=”, ) url = “https://wx2.qq.com/cgi-bin/mmwebwx-bin/webwxnewloginpage?ticket=” + ticket + “&uuid=” + uuid + “&lang=zh_CN&scan=” + 时间_取现行时间戳 () + “&fun=new&version=v2&lang=zh_CN” 源文件 = 网页_访问S (url) 调试输出 (源文件) shey = 文本_取出中间文本 (源文件, “<skey>”, “</skey>”) wxsid = 文本_取出中间文本 (源文件, “<wxsid>”, “</wxsid>”) wxuin = 文本_取出中间文本 (源文件, “<wxuin>”, “</wxuin>”) pass_ticket = 文本_取出中间文本 (源文件, “<pass_ticket>”, “</pass_ticket>”) ' 调试输出 (shey, wxsid, wxuin, pass_ticket) url = “https://wx2.qq.com/cgi-bin/mmwebwx-bin/webwxinit?r=-1339008341&lang=zh_CN&pass_ticket=” + pass_ticket a = #常量3 a = 子文本替换 (a, “547971858”, wxuin, , , 真) a = 子文本替换 (a, “w5O/ftDTgVuAsl6B”, wxsid, , , 真) a = 子文本替换 (a, “@crypt_3644345f_aacb287fd0e18e90545909a2c6db15eb”, shey, , , 真) 源文件 = 网页_访问S (url, 1, a) ' 微信名字=文本_ 调试输出 (编码_utf8到gb2312 (源文件)) ' url = “https://wx2.qq.com/cgi-bin/mmwebwx-bin/webwxgeticon?seq=175126120&username=@9d18f67759dabd5566030ec8772cb483d39a8a56abef4de83a499126e7e5a1ab&skey=” + shey ' 网页_访问S (url) .默认 .判断结束 延迟 (500) 扫码 ()
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注