易语言登录百度云的实现代码

.版本 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模块和精易模块
获取cookie需要和https://blog.csdn.net/mp624183768/article/details/87910600 这个插件配合使用