精易论坛

标题: 一个获取网页跳转地址的问题，实在蛋疼，求解答！！！！！！！ [打印本页]

作者: WsAb 时间: 2014-1-20 17:19
标题: 一个获取网页跳转地址的问题，实在蛋疼，求解答！！！！！！！

上图是源码。下面是电信和网通跳转的不同地址。但是网通的无法下载。

有木有大神知道的，帮忙解答下。

补充内容 (2014-1-20 20:28):
原始地址：http：//cdn.yyupload.com/down/1875089/LoL Beautify/LB DLL/LB Repair.zip
源码在下面。。

作者: WsAb 时间: 2014-1-20 17:22

地址图片上传错了，这个是。

作者: 梦游仙 时间: 2014-1-20 17:51
{:soso_e127:} 全是图片估计只有神仙帮的了你

作者: ljk5203 时间: 2014-1-20 18:43
神仙应该很快就会出现了... 一起等

作者: 小爬虫 时间: 2014-1-20 18:46
楼主是不是在局域网里,端口被限制了?因为网通的端口是82,非正常的80

我看网通获取的地址,没有问题

应该是你自身的网络环境问题

作者: WsAb 时间: 2014-1-20 19:42

小爬虫发表于 2014-1-20 18:46
楼主是不是在局域网里,端口被限制了?因为网通的端口是82,非正常的80

我看网通获取的地址,没有问题

不是，电信的是我获取的，网通的是我客户获取的，很多网通都是这个问题呢

作者: WsAb 时间: 2014-1-20 20:29
[e]
.版本 2

.子程序网页获取跳转页面, 文本型, , 跳转了返回跳转地址  否则返回原地址
.参数 URL, 文本型
.局部变量 xml, 对象
.局部变量返回值, 变体型

.如果真 (xml.创建 (“WinHttp.WinHttpRequest.5.1”, ) ＝假)
写到文件 (取运行目录 () ＋ “\对象创建失败.log”, 到字节集 (URL))
返回 (“获取失败”)
.如果真结束

xml.写属性 (“Option”, 6, 0)  '
xml.方法 (“SetTimeouts”, 5000, 5000, 10000, 5000)  ' 超时时间
xml.方法 (“open”, “GET”, URL, 假)
xml.方法 (“setRequestHeader”, “User-Agent”, “Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)”)
xml.方法 (“setRequestHeader”, “Accept-Language”, “zh-cn”)
xml.方法 (“setRequestHeader”, “Connection”, “Keep-Alive”)
xml.方法 (“setRequestHeader”, “Accept”, “image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/x-silverlight, */*”)
xml.方法 (“send”, )

返回值＝ xml.读属性 (“status”, )

.如果真 (返回值.取数值 () ＝ 302)  ' 302——在其他地址发现了请求数据
URL ＝ xml.读属性 (“GetResponseHeader”, “Location”).取文本 ()  ' 查找跳转页面
.如果真结束
xml.清除 ()

返回 (URL)
[/e]

欢迎光临精易论坛 (https://125.confly.eu.org/)