百度POST登录协议源码

.版本 2 .支持库 EThread .程序集 窗口程序集_窗口1 .程序集变量 code_true, 逻辑型 .程序集变量 Baidu, BaiDu .子程序 _按钮1_被单击 启动线程 (&Login, , ) .子程序 Login .局部变量 sta, 整数型 .局部变量 user, 文本型 .局部变量 pass, 文本型 sta = Baidu.Login (编辑框1.内容, 编辑框2.内容) .判断循环首 (sta = 3) 图片框1.图片 = Baidu.GetImg () .判断循环首 (取文本长度 (编辑框3.内容) ≠ 4) 处理事件 () .判断循环尾 () sta = Baidu.Login (编辑框1.内容, 编辑框2.内容, 编辑框3.内容) 图片框1.图片 = { } 编辑框3.内容 = “” .判断循环尾 () .判断开始 (sta = 1) 信息框 (“登录成功,Cookie:” + Baidu.GetCookie (), 64, “登录:”, ) .判断 (sta = 2) 信息框 (“登录失败,密码错误!”, 64, “登录:”, ) .默认 信息框 (“登录失败,未知错误!”, 64, “登录:”, ) .判断结束 .子程序 _窗口1_创建完毕
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

发表回复

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