% option explicit dim strURL, strCounty, strCountyID, strTitle, strRMLnk, strPLLnk strURL = Request.ServerVariables("HTTP_HOST") strCounty = "surrey" strCountyID = "505" strTitle = strURL & " - Search Page" strRMLnk = "http://www.rightmove.co.uk/property/Surrey.html" strPLLnk = "http://www.primelocation.com/uk-property-for-sale/browse/all/uk/england/surrey/" %>