消息关闭
    暂无新消息!
页面地址:http://www.gxcaipiao.com.cn/xml/notice_12.xml
notice_12.xml这个文件是存在的,但是用浏览器访问却出现403错误,但是直接用迅雷等下载工具又可以把这个文件下载回本地电脑,请问是怎么回事?怎样才能用浏览器访问这个页面?

2个回答

︿ 3
Response.CharSet="utf-8"
    private function BinToString(bin,encoding)
    dim obj
    set obj=Server.CreateObject("Adodb.Stream")
    obj.Type=1:obj.Mode=3:obj.Open
    obj.Write bin
    obj.Position=0:obj.Type=2:obj.Charset=encoding
    BinToString=obj.ReadText
    obj.Close:set obj=nothing
  end function
  
  
    Set oHttp = Server.CreateObject("WinHttp.WinHttpRequest.5.1")
      
    ohttp.open "get","http://www.gxcaipiao.com.cn/xml/notice_12.xml",false
    ohttp.setRequestHeader "Referer","http://www.gxcaipiao.com.cn/notice/notice_12.html"''''''''''''''''''''''''''''''
    ohttp.send(null)
    response.Write "<textarea style='height:500px;width:100%'>"& BinToString(ohttp.ResponseBody,"gb2312")&"</textarea>"