一个QQ空间扫二维码登录的例子

局_返回文本 ＝ 网页_访问S (“https://ssl.ptlogin2.qq.com/ptqrlogin?u1=https%3A%2F%2Fqzs.qzone.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone%26specifyurl%3Dhttp%253A%252F%252Fuser.qzone.qq.com%252F975796865%252Fmain&ptqrtoken=” ＋ 程_Qrsig ＋ “&ptredirect=0&h=1&t=1&g=1&from_ui=1&ptlang=2052&action=5-0-1580894228445&js_ver=20010217&js_type=1&login_sig=&pt_uistyle=40&aid=549000912&daid=5&has_onekey=1&”, , , 程_Cookies, 局_返回Cookies, ) ' 获取当前二维码情况
局_返回文本 ＝ 编码_URL解码 (局_返回文本, 真) ' 需URL解码
' 调试输出 (返回文本)
.' 如果真 (寻找文本 (局_返回文本, “未失效”, , 假) ≠ -1)
' 透明标签_提示.标题 ＝ “二维码扫描未失效！”
.如果真结束
.如果真 (寻找文本 (局_返回文本, “认证中”, , 假) ≠ -1) ' 寻找关键词判断结果
透明标签_提示.标题 ＝ “扫描成功,请在手机上确认是否授权登录！”
.如果真结束
.如果真 (寻找文本 (局_返回文本, “已失效”, , 假) ≠ -1)
时钟_刷新事件.时钟周期 ＝ 0
启动线程 (&子程序_获取登录二维码, , )
.如果真结束
.如果真 (寻找文本 (局_返回文本, “登录成功”, , 假) ≠ -1)
时钟_刷新事件.时钟周期 ＝ 0
透明标签_提示.标题 ＝ “登录成功,欢迎 ” ＋ 文本_取出中间文本 (局_返回文本, “登录成功！', '”, “')”)
编辑框_Cookies.内容 ＝ 局_返回Cookies
信息框 (透明标签_提示.标题, 0, “登录成功”, )