<% 'The Link Building Direct system will check this 'page once a week. Your website will be removed 'from the network if you alter this code in any way. Dim htmlCode Dim serverXMLHTTP Dim requestingPage requestingPage = "HTTP://www.linkbuildingdirect.com/Directory.aspx?CategoryID=" & Request.QueryString("CategoryID") 'requestingPage = "HTTP://localhost/linkbuildingdirect/Directory.aspx?CategoryID=" & Request.QueryString("CategoryID") Set serverXMLHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP") serverXMLHTTP.Open "GET", requestingPage, False serverXMLHTTP.Send htmlCode = serverXMLHTTP.ResponseText Response.Write(htmlCode) %>