<% Response.Buffer = True Dim objXMLHTTP, xml ' Create an xmlhttp object: Set xml = Server.CreateObject("Microsoft.XMLHTTP") ' Or, for version 3.0 of XMLHTTP, use: ' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP") ' Opens the connection to the remote server. xml.Open "GET", "http://www.appsoftdevelopment.com/x-change.asp", False ' Actually Sends the request and returns the data: xml.Send 'Display the HTML both as HTML and as text Response.Write xml.responseText Set xml = Nothing %>