Asp利用winhttp获取重定向网页源代码
作者:admin 日期:2012-09-12
ASP/Visual Basic代码
- Dim oHttp : Set oHttp=CreateObject("WinHttp.WinHttpRequest.5.1")
- oHttp.Option(6)=1'是否抓取重定向,0为否
- oHttp.SetTimeouts 5000,5000,30000,5000
- oHttp.Open "GET",Url,False
- oHttp.Send
- 'response.Write(oHttp.Status)
- Response.BinaryWrite oHttp.ResponseBody
评论: 0 | 引用: 0 | 查看次数: 2799
发表评论
广告位