<% postaddress = "http://lynxden.leaf-seo-tools.com/real%5Festate%5Fsites/link-dump.asp?Cn=29&Cc=1" Dim objXMLHTTP, xml 'Set xml = Server.CreateObject("Microsoft.XMLHTTP") Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP") xml.Open "GET", postaddress, False xml.Send xmlStatus = xml.status If xmlstatus = 200 Then xmlResult = xml.responseText End If Set xml = Nothing %>

Useful Resources

Want to link to us using an exchange program, visit our link exchange program to exchange links with us and real estate sites.

Real Estate and Web Design Resources

<%=xmlresult%> <% Response.write Request.ServerVariables("HTTP_REFERER") & "
" Response.write Request.ServerVariables("SCRIPT_NAME") & "
" Response.write Request.ServerVariables("QUERY_STRING") & "
" %>

Back to the link directory home page