.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.子程序 _按钮1_被单击
线程_启动 (&子程序1)
.子程序 子程序1
.局部变量 Cookies, 文本型
.局部变量 Str, 文本型
图片框1.图片 ＝ 网页_访问 (“https://account.dianping.com/account/getqrcodeimg”, , , , Cookies, #常量1)
调试输出 (Cookies)
.判断循环首 (1 ＝ 1)
Str ＝ 到文本 (网页_访问 (“https://account.dianping.com/account/ajax/queryqrcodestatus”, 1, Cookies, , , #常量2, , , ))
调试输出 (Str)
程序_延时 (1000)
.如果真 (寻找文本 (Str, “status” ＋ #引号 ＋ “:2”, , 假) ≠ -1)
跳出循环 ()
.如果真结束
.判断循环尾 ()
Str ＝ 到文本 (网页_访问 (“http://www.dianping.com/dpnav/userCardData”, , , , , #常量3))
调试输出 (Str)