<%
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", "http://www.codetoad.com/", False
xml.Send Response.write " Now here's how the page looks:<BR><BR>"
Response.Write xml.responseText
Set xml = Nothing
%>
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", "http://www.codetoad.com/", False
xml.Send Response.write " Now here's how the page looks:<BR><BR>"
Response.Write xml.responseText
Set xml = Nothing
%>
{
XmlDocument xmlDoc = new XmlDocument();
XmlTextReader xmlTxtReader = new XmlTextReader(Request.InputStream); Response.ContentType = "text/xml";
Response.Charset = "GB2312"; xmlDoc.Load(xmlTxtReader); Response.Write("<?xml version=\"1.0\" encoding=\"GB2312\" ?>");
Response.Write(xmlDoc.DocumentElement.OuterXml); xmlTxtReader.Close();
}
http://dotnet.aspx.cc/ShowDetail.aspx?id=9D49B3EF-0F91-421B-841F-5D9A000BDA04