.版本 2
.支持库 spec
.支持库 HtmlView

.程序集 窗口程序集_启动窗口
.程序集变量 浏览器句柄, 整数型

.子程序 _按钮_login_被单击
.局部变量 是否就绪, 整数型


子程序_login ()
调试输出 (“执行结束”)

.子程序 __启动窗口_创建完毕


浏览器句柄 = 超文本浏览框1.取窗口句柄 ()
调试输出 (浏览器句柄)
浏览器句柄 = 68420
网页填表.初始化 (浏览器句柄)

.子程序 _超文本浏览框_即将跳转, 逻辑型



.子程序 子程序_login
.局部变量 是否就绪, 整数型
.局部变量 cookie, 文本型

网页填表.网页_跳转 (“https://pan.baidu.com/”)
网页填表.就绪判断_智能 (浏览器句柄)
网页填表.按钮_点击 (“Id==TANGRAM__PSP_4__footerULoginBtn”, , 1)
网页填表.文本框_写内容 (“Name==userName”, 编辑框_bdy_user.内容, , 1)
网页填表.文本框_写内容 (“Name==password”, 编辑框_bdy_pwd.内容, , 1)
网页填表.按钮_点击 (“Id==TANGRAM__PSP_4__submit”, , 1)
是否就绪 = 网页填表.就绪判断 (浏览器句柄, “安全验证”, , , 1, 3000)
' 通过【网页文本】关键字判断网页是否载入就绪,如果就绪并且找到关键字,返回相应的值(如找到关键字1返回1,找到关键字2则返回2,以此类推),失败返回-1。
.如果真 (是否就绪 = 1)
按钮_login.标题 = “请手动验证”
' 子程序_login ()
是否就绪 = 网页填表.就绪判断 (浏览器句柄, “我的设备”, , , 1, -1)
按钮_login.标题 = “登录成功”
.如果真结束

调试输出 (超文本浏览框1.取网页Cookie ())

用到了精易vip模块 和精易模块