文件名称:115网盘POST领取空间(易语言源码)
文件大小:23KB
文件格式:E
更新时间:2014-07-19 13:36:59
易语言 源码 115网盘 控件 POST
一键领取115空间 不必登录了!~ .版本 2 .子程序 领取, 文本型, , 成功返回领取的空间大小(MB),失败返回空(注:先登陆后领取,另外领取过的会失败) .局部变量 返回文本, 文本型 http.Open (“GET”, “http://u.115.com/?ct=ajax&ac=pick_storage”) ' 设置协议头 http.SetRequestHeader (“Referer”, “http://u.115.com/?ct=frame&_t=” + APItime) http.SetRequestHeader (“User-Agent”, “Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)”) http.Send () 返回文本 = http.ResponseText () .如果真 (返回文本 ≠ “no”) ' 领取失败 返回文本 = 高级截取文本 (返回文本, #左边文本, #右边文本) .如果真结束 返回 (返回文本)