获取软件下载的真实地址!再谈获取Response.redirect重定向的URL

2018-09-06 12:41

阅读:437

  其实这个问题落伍谈了n次了
其中care4也说了两次所以如果你有问题最好先搜索一下 说不定问题早有人解决了


care4的代码有一个小缺点 就是需要组件。
第一个是件 二不是 但用组件始终不太方便有没有asp直接获取的方式呢

答案是有的
我写的一个vb简单的winsock获取的代码



当时我说用asp好像不能获得,那是当时没有去csdn混去,现在搞定了

首先我们要了解为什么xmlhttp组件无法获得这样的跳转真实地址
用Response.Redirect跳转,PHP里面是Header(Location,$URL);
这两种方式都是一样的原理,就是在输出的HTTP头里面加上一个Location字段
同时把返回的HTTP状态值设为302,浏览器就会认为当前请求的页面已经
被移动到Location指定的路径
那么为什么xmlhttp无法获得呢?
原因很简单
XMLHTTP组件在处理包含Location头的302消息时太智能了,直接给跳转到最后的页面,也就是说~我们看不到中间的过程!比尔自作聪明阿 !

不过还好MSXML4里面提供了一个可用的新的组件:WinHttp.WinHttpRequest.5.1,这个也是MSXML4 XMLHTTP组件的核心。 WinHttp.WinHttpRequest有一个十分关键的属性:Option,这个属性的第六个索引就是指示是否自动跳转,然后就可以轻松的使用XMLHTTP组件的getResponseHeader和getAllResponseHeaders方法来获取返回的HTTP头信息了。

好接下来就看代码了
Dim oHttp
Set oHttp=Server.CreateObject(WinHttp.WinHttpRequest.5.1
oHttp.Option(6)=0 禁止自动Redirect,最关键的剩下的就简单读取数据都估计大家都会
oHttp.SetTimeouts 5000,5000,30000,5000设置超时~和ServerXMLHTTP组件一样
oHttp.Open GET,sUrl,False 以同步模式打开URL
If oHttp.Status<>200 And oHttp.Status<>302 Then
oHttp.Status对应返回的HTTP状态,如果是200,表示这个就是最终页面,没有Location跳转
如果是302,表示当前请求的URL已经被移动,需要根据HTTP头来跳转
对于其他数值的状态,基本上我们不要处理,但是你要处理也可以比如 440或者别的状态你自己处理就可以了!
Else
在这里对返回的HTTP头和文档内容进行处理
End If

好了比较完整的代码比较长
我传了个到空间上自己看去

默认的输入栏里的代码是crsky的一个下载地址你可以测试一下就知道了
点查看源代码就可以看见这个asp文件的源代码!

一切搞定 over 继续去csdn混分去了

  完整代码:
复制代码 代码如下:


评论


亲,登录后才可以留言!