快手微博授权登录源码

快手微博授权登录源码

@xlh

.版本 2
.支持库 spec

.子程序 微博登录, 逻辑型, 公开
.参数 账号, 文本型
.参数 密码, 文本型
.参数 IP, 文本型
.参数 授权链接, 文本型, 参考
.参数 Err, 文本型, 参考
.局部变量 http, WinInet
.局部变量 Ret, 文本型
.局部变量 json, 类_json
.局部变量 verifyToken, 文本型
.局部变量 uid, 文本型

http.SetProxy (IP)
http.AutoCookies (1)
http.Open (“POST”, “https://passport.weibo.cn/sso/login”)
http.SetUserAgent (“Mozilla/5.0 (Linux; Android ” ＋ 文本_取右边 (帐号信息.安卓版本, “_”) ＋ “; xiaomi 6 Build/LMY49I) AppleWebKit/537.36 (KHTML, like Gecko) Version/4.0 Chrome/39.0.0.0 Mobile Safari/537.36”)
http.SetReferer (“https://passport.weibo.cn/signin/login?client_id=2459267064&redirect_uri=http://www.gifshow.com/i/connect/cbsina&display=sdk&action=login&rf=1&version=0031205000&sso_type=1&offcialMobile=true&scope=email,friendships_groups_read,,statuses_to_me_read,follow_app_official_microblog,invitation_write”)
http.Send (“username=” ＋ 账号 ＋ “&password=” ＋ 密码 ＋ “&savestate=1&r=&ec=0&pagerefer=&entry=mweibo&wentry=&rf=1&loginfrom=2&client_id=2459267064&code=&qq=&mainpageflag=1&hff=&hfp=”)
Ret ＝ http.GetResponseTextUtf8ToAnsi ()
调试输出 (Ret)
json.解析 (Ret)
.判断开始 (json.取通用属性 (“retcode”) ＝ “20000000”)
    http.SetRedirect (假)
    http.Open (“POST”, “https://open.weibo.cn/oauth2/authorize”)
    http.SetUserAgent (“Mozilla/5.0 (Linux; Android ” ＋ 文本_取右边 (帐号信息.安卓版本, “_”) ＋ “; xiaomi 6 Build/LMY49I) AppleWebKit/537.36 (KHTML, like Gecko) Version/4.0 Chrome/39.0.0.0 Mobile Safari/537.36”)
    http.SetReferer (“https://passport.weibo.cn/signin/login?client_id=2459267064&redirect_uri=http://www.gifshow.com/i/connect/cbsina&display=sdk&action=login&rf=1&version=0031205000&sso_type=1&offcialMobile=true&scope=email,friendships_groups_read,,statuses_to_me_read,follow_app_official_microblog,invitation_write”)
    http.Send (“client_id=2459267064&redirect_uri=http%3A%2F%2Fwww.gifshow.com%2Fi%2Fconnect%2Fcbsina&display=sdk&action=login&rf=1&version=0031205000&sso_type=1&offcialMobile=true&scope=email%2Cfriendships_groups_read%2C%2Cstatuses_to_me_read%2Cfollow_app_official_microblog%2Cinvitation_write&wm=3349&ticket=” ＋ json.取通用属性 (“data.ticket”))
    Ret ＝ http.GetResponseTextUtf8ToAnsi ()
    verifyToken ＝ 文本_取出中间文本 (Ret, “verifyToken#引号 value=#引号”, #引号)
    uid ＝ 文本_取出中间文本 (Ret, “uid#引号 value=#引号”, #引号)
    .判断开始 (verifyToken ≠ “”)
        http.Open (“POST”, “https://open.weibo.cn/oauth2/authorize”)
        http.SetUserAgent (“Mozilla/5.0 (Linux; Android ” ＋ 文本_取右边 (帐号信息.安卓版本, “_”) ＋ “; xiaomi 6 Build/LMY49I) AppleWebKit/537.36 (KHTML, like Gecko) Version/4.0 Chrome/39.0.0.0 Mobile Safari/537.36”)
        http.SetReferer (“https://passport.weibo.cn/signin/login?client_id=2459267064&redirect_uri=http://www.gifshow.com/i/connect/cbsina&display=sdk&action=login&rf=1&version=0031205000&sso_type=1&offcialMobile=true&scope=email,friendships_groups_read,,statuses_to_me_read,follow_app_official_microblog,invitation_write”)
        http.Send (“display=sdk&action=scope&scope=&withOfficalFlag=0&withOfficalAccount=null&response_type=code&regCallback=https%253A%252F%252Fopen.weibo.cn%252F2%252Foauth2%252Fauthorize%253Fclient_id%253D2459267064%2526response_type%253Dcode%2526display%253Dsdk%2526redirect_uri%253Dhttp%25253A%25252F%25252Fwww.gifshow.com%25252Fi%25252Fconnect%25252Fcbsina%2526from%253D%2526with_cookie%253D&redirect_uri=http%3A%2F%2Fwww.gifshow.com%2Fi%2Fconnect%2Fcbsina&client_id=2459267064&appkey62=3XCSMM&state=&from=&offcialMobile=true&uid=” ＋ uid ＋ “&url=&verifyToken=” ＋ verifyToken ＋ “&visible=0&version=0031205000&sso_type=1”)
        授权链接 ＝ 文本_取出中间文本 (http.GetAllResponseHeaders (), “Location:”, #换行符)
        返回 (真)
    .默认
        授权链接 ＝ 文本_取出中间文本 (http.GetAllResponseHeaders (), “Location:”, #换行符)
        返回 (真)
    .判断结束

.默认
    Err ＝ json.取通用属性 (“msg”)
    返回 (假)
.判断结束