QQ日历群发安卓协议源码 自动识别验证码登录

.' 如果真 (取反 (文件是否存在 (取运行目录 () ＋ “\gzip.dll”)))
' 写到文件 (取运行目录 () ＋ “\gzip.dll”, #gzip)
.如果真结束
连续赋值 (“”, Hk.X, Hk.Y, Hk.Uid, Hk.Sid, Hk.Eks, Hk.Sess, Hk.Vsig, Hk.Data, Hk.Cdata, Hk.Websig, Hk.CdnPic [1], Hk.CdnPic [2], Hk.Ticket, Hk.QQCapcd, Hk.Referer, Hk.RandStr, Hk.Collectdata, Hk.slideValue, Hk.Collectdata, Hk.CreateIframeStart)
.如果真 (ProxyIp ≠ “”)
Http.SetTimeouts (2000, 2000, 3500)
Http.SetProxy (ProxyIp)

' 要验证码
临时cookie ＝ cookie
图片 ＝ 网页_访问_对象 (“https://mail.qq.com/cgi-bin/getverifyimage?aid=23000101&sid=” ＋ sid ＋ “&” ＋ 时间_取随机时间戳 (), , , 临时cookie, 图片返回cookie, , , , , )
' 配置联众打码
自用_验证码初始化 ()
验证结果 ＝ 自用_验证码识别 (图片)
调试输出 (验证结果)
.如果真 (取文本长度 (验证结果) ≠ 4)
临时cookie ＝ cookie
图片 ＝ 网页_访问_对象 (“https://mail.qq.com/cgi-bin/getverifyimage?aid=23000101&sid=” ＋ sid ＋ “&” ＋ 时间_取随机时间戳 (), , , 临时cookie, 图片返回cookie, , , , , )
' 配置联众打码
自用_验证码初始化 ()
验证结果 ＝ 自用_验证码识别 (图片)
.如果真 (取文本长度 (验证结果) ≠ 4)
失败原因 ＝ “验证码识别错误”
返回 (假)
.如果真结束

.如果真结束
临时cookie ＝ cookie
url ＝ “https://mail.qq.com/cgi-bin/calendar”
data ＝ “fun=mail_share&folderid=0&touser=” ＋ 手机人QQ ＋ “@qq.com&verifycode=” ＋ 验证结果 ＋ “&verifykey=” ＋ verifykey ＋ “&resp_charset=UTF8&sid=” ＋ sid ＋ “&t=share_calendar.json”
return ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (url, 1, data, 临时cookie ＋ “; ” ＋ 图片返回cookie)))