QQ邮箱扫码登录例程源码

部分代码:

.版本 2 .支持库 EThread .支持库 spec .程序集 窗口程序集_启动窗口 .程序集变量 Cookie_提交, 文本型 .程序集变量 Cookie_返回, 文本型 .程序集变量 Cookie_提交1, 文本型 .程序集变量 qrsig, 文本型 .程序集变量 ptqrtoken, 文本型 .程序集变量 二次登录, 文本型 .程序集变量 名称, 文本型 .程序集变量 qqmailkey, 文本型 .子程序 __启动窗口_创建完毕 .局部变量 返回数据, 文本型 ' 返回数据 = 到文本 (网页_访问_对象 (“https://ssl.ptlogin2.qq.com/ptqrlogin?u1=https%3A%2F%2Fmail.qq.com%2Fcgi-bin%2Freadtemplate%3Fcheck%3Dfalse%26t%3Dloginpage_new_jump%26vt%3Dpassport%26vm%3Dwpt%26ft%3Dloginpage%26target%3D&ptqrtoken=669278738&ptredirect=0&h=1&t=1&g=1&from_ui=1&ptlang=2052&action=1-0-1589096407876&js_ver=20032614&js_type=1&login_sig=&pt_uistyle=25&aid=522005705&daid=4&”)) 返回数据 = 到文本 (网页_访问_对象 (“https://xui.ptlogin2.qq.com/cgi-bin/xlogin?target=self&appid=522005705&daid=4&s_url=https://mail.qq.com/cgi-bin/readtemplate?check=false%26t=loginpage_new_jump%26vt=passport%26vm=wpt%26ft=loginpage%26target=&style=25&low_login=1&proxy_url=https://mail.qq.com/proxy.html&need_qr=0&hide_border=1&border_radius=0&self_regurl=//zc.qq.com/chs/index.html?type=1&app_id=11005?t=regist&pt_feedback_link=//support.qq.com/discuss/350_1.shtml&css=https://res.mail.qq.com/zh_CN/htmledition/style/ptlogin_input_for_xmail440503.css”, , , Cookie_返回)) Cookie_提交 = Cookie_返回 ' “https://ssl.ptlogin2.qq.com/ptqrlogin?u1=https%3A%2F%2Fmail.qq.com%2Fcgi-bin%2Freadtemplate%3Fcheck%3Dfalse%26t%3Dloginpage_new_jump%26vt%3Dpassport%26vm%3Dwpt%26ft%3Dloginpage%26target%3D&ptqrtoken=1939981802&ptredirect=0&h=1&t=1&g=1&from_ui=1&ptlang=2052&action=1-0-1589095127921&js_ver=20032614&js_type=1&login_sig=&pt_uistyle=25&aid=522005705&daid=4&” 获取二维码 () .子程序 获取二维码 .局部变量 token, 文本型 .局部变量 JS加密, 类_脚本组件 图片框1.图片 = 网页_访问_对象 (“https://ssl.ptlogin2.qq.com/ptqrshow?appid=522005705&e=2&l=M&s=3&d=72&v=4&t=” + 时间_取随机时间戳 () + “&daid=4&pt_3rd_aid=0”, 0, , Cookie_提交, Cookie_返回) Cookie_提交 = 网页_Cookie合并更新 (Cookie_提交, Cookie_返回) qrsig = 文本_取出中间文本 (Cookie_提交, “qrsig=”, “;”) ' token = 文本_取出中间文本 (Cookie_返回, “pt_local_token=”, “;”) JS加密.执行 (#常量_JS代码) ptqrtoken = JS加密.运行 (“jsjiami”, qrsig) 启动线程 (&检测二维码状态, , ) .子程序 检测二维码状态 .局部变量 返回文本, 文本型 .局部变量 提示二维码状态, 文本型 .判断循环首 (真) 返回文本 = 到文本 (编码_Utf8到Ansi (网页_访问_对象 (“https://ssl.ptlogin2.qq.com/ptqrlogin?u1=https%3A%2F%2Fmail.qq.com%2Fcgi-bin%2Freadtemplate%3Fcheck%3Dfalse%26t%3Dloginpage_new_jump%26vt%3Dpassport%26vm%3Dwpt%26ft%3Dloginpage%26target%3D&ptqrtoken=” + ptqrtoken + “&ptredirect=0&h=1&t=1&g=1&from_ui=1&ptlang=2052&action=1-0-” + 时间_取现行时间戳 () + “&js_ver=20032614&js_type=1&login_sig=&pt_uistyle=25&aid=522005705&daid=4&”, 0, , Cookie_提交, Cookie_返回))) .如果真 (寻找文本 (返回文本, “登录成功”, , 假) ≠ -1) Cookie_提交 = 网页_Cookie合并更新 (Cookie_提交, Cookie_返回) 二次登录 = 文本_取出中间文本 (返回文本, “0','0','”, “','0','”) 跳出循环 () .如果真结束 延迟 (1000) .判断循环尾 () 调试输出 (二次登录) 二次_登录 () .子程序 二次_登录 .局部变量 返回文本, 文本型 返回文本 = 编码_Utf8到Ansi (网页_访问_对象 (二次登录, 0, , Cookie_提交, Cookie_返回, , , , 真)) Cookie_提交 = Cookie_返回 Cookie_提交 = 文本_替换 (Cookie_提交, , , , “pt2gguin=;”, “”, “p_skey_forbid=; ”, “”, “p_uin=; ”, “”, “p_skey=; ”, “”, “pt4_token=; ”, “”) Cookie_提交 = 文本_替换 (Cookie_提交, , , , “ETK=; ”, “”, “airkey=; ”, “”) ' https://mail.qq.com/cgi-bin/readtemplate?check=false&t=loginpage_new_jump&vt=passport&vm=wpt&ft=loginpage&target=&qqmailkey=4cf0f94e64de547024d15837b8e9fb9ce996a0a82160822cde1aeae3cbf5ba6e ' qqmailkey = 编码_Utf8到Ansi (网页_访问_对象 (Cookie_提交, 0, , Cookie_提交)) ' 返回文本 = 到文本 (编码_Utf8到Ansi (网页_访问_对象 (“ https://mail.qq.com/cgi-bin/readtemplate?check=false&t=loginpage_new_jump&vt=passport&vm=wpt&ft=loginpage&target=&qqmailkey=” + qqmailkey + “”, 0, , Cookie_提交, ))) 调试输出 (返回文本) 获取好友分组 () .子程序 发邮件 .局部变量 返回文本, 文本型 返回文本 = 编码_Utf8到Ansi (网页_访问_对象 (“https://mail.qq.com/cgi-bin/compose_send?sid=6B_HF_yJ8bAJFT9h”, 1, “1da16015ee8e6b132259e39ec038aef8=566c4d179c5c34436003d7f10e822fb1&sid=6B_HF_yJ8bAJFT9h&from_s=cnew&signtype=0&to=” + 编辑框_收件人 + “&subject=” + 编辑框_主题.内容 + “&content__html=<div>” + 编辑框_正文.内容 + “</div>&[email protected]&savesendbox=1&actiontype=send&sendname=&acctid=0 &separatedcopy=false&s=comm&hitaddrbook=0&selfdefinestation=-1&domaincheck=0&cgitm=” + 时间_取现行时间戳 () + “&clitm=” + 时间_取现行时间戳 () + “&comtm=” + 时间_取现行时间戳 () + “&logattcnt=0&logattsize=0&cginame=compose_send&ef=js&t=compose_send.json&resp_charset=UTF8”, Cookie_提交)) .子程序 _按钮1_被单击 发邮件 () .子程序 获取好友分组 .局部变量 返回文本, 文本型 ' 返回文本 = 编码_Utf8到Ansi (网页_访问_对象 (“https://mail.qq.com/cgi-bin/laddr_lastlist?sid=6B_HF_yJ8bAJFT9h&encode_type=js&t=addr_datanew&s=AutoComplete&category=hot&resp_charset=UTF8&ef=js&r=” + 时间_取随机时间戳 () + “”, 0, , Cookie_提交))
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

发表回复

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