CSDN免滑块登录例子 无限免滑块登录

' cookie自行获取吧。
Str ＝ 编码_Utf8到Ansi (网页_访问_对象 (“https://passport.csdn.net/v1/api/riskControl/checkHVC”, 1, #验证, Cookie, , #UA, ))
Json.解析 (Str)
.如果 (Json.取通用属性 (“message”) ＝ “success”)
Post ＝ #常量1
Post ＝ 子文本替换 (Post, “[USER]”, User, , , 真)
Post ＝ 子文本替换 (Post, “[PASS]”, Pass, , , 真)
Str ＝ 编码_Utf8到Ansi (网页_访问_对象 (“https://passport.csdn.net/v1/register/pc/login/doLogin”, 1, Post, Cookie, , #UA, ))