易语言百度空间操作源码

程序创建WinHttp对象，调用API函数实现百度空间操作。

@易语言资源网

.版本 2

.子程序 _按钮1_被单击
.局部变量 http, http
.局部变量 返回文本, 文本型
.局部变量 url, 文本型

url ＝ 子文本替换 (子文本替换 (“username={user}&password={pass}&mem_pass=on”, “{user}”, 编辑框_用户名.内容, , , 真), “{pass}”, 编辑框_密码.内容, , , 真)
返回文本 ＝ 到文本 (http.读网页 (“https://passport.baidu.com/?login”, “post”, url, , cookie))
.如果 (寻找文本 (返回文本, “用户登录”, , 假) ≠ -1)  ' 登陆百度空间
    信息框 (“登陆成功”, 0, )
.否则
    信息框 (“登陆失败”, 0, )