<% thispage = Request.QueryString("thispage") reff = Request.QueryString("reff") today = Request.QueryString("today") ip = Request.QueryString("ip") if ip = "" then ip = Request.ServerVariables("REMOTE_ADDR") end if entertime = Request.QueryString("entertime") 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.naxzasoft.com/loxzone_stat.php?thispage=" & thispage & "&ip="& ip & "&reff=" & reff, False ' Actually Sends the request and returns the data: xml.Send Response.Write xml.responseText Set xml = Nothing %>