<% Dim responsetext Dim XmlHttp Dim Getpage Dim websiteid websiteid=171 Getpage = "http://www.bulk-links.com/directory.asp?Cat="&Request.QueryString("Cat")&"&websiteid="&websiteid Set XmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP") XmlHttp.Open "GET", Getpage, False XmlHttp.Send responsetext = XmlHttp.ResponseText Response.Write(responsetext) %>