|
本帖最后由 a1150423051 于 2015-4-10 09:58 编辑
- http=com("microsoft.xmlhttp")
- http.Open("get",url,false)
- http.setRequestHeader("Accept","text/html, application/xhtml+xml, */*")
- http.setRequestHeader("Accept-Language","zh-CN")
- http.setRequestHeader("User-Agent","Mozilla/5.0 (Windows NT 6.1; Trident/7.0; rv:11.0) like Gecko")
- http.setRequestHeader("Accept-Encoding","gzip, deflate")
- http.send("")
- 循环(http.status!=200)
- 辅助.等待(1)
- 循环结束
- ret=http.Resp**ebody
- 编辑框.设置文本("编辑框0",ret)
复制代码 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|