Contact Us

<% @Language = VBScript %> <% Option Explicit Dim strValidate, dataEntered Dim name, email, telephone, fax, address1, address2, address3, town, county, postcode, country Dim sendEmail, bodyText Dim myCounter Dim strDay, strMonth, strYear, strEventdate, strDayDep, strMonthDep, strYearDep, strEventdateDep, strPeople, strMessage Session("title") = "Booking Enquiry Form" %> <% strValidate = TRUE dataEntered = FALSE If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then dataEntered = TRUE name = Trim(Request.Form("name")) email = LCase(Trim(Request.Form("email"))) telephone = Trim(Request.Form("telephone")) fax = Trim(Request.Form("fax")) address1 = Trim(Request.Form("address1")) address2 = Trim(Request.Form("address2")) address3 = Trim(Request.Form("address3")) town = Trim(Request.Form("town")) county = Trim(Request.Form("county")) postcode = UCase(Trim(Request.Form("postcode"))) country = Trim(Request.Form("country")) strDay = Trim(Request.Form("day")) strMonth = Trim(Request.Form("month")) strYear = Trim(Request.Form("year")) strEventdate = strDay & "/" & strMonth & "/" & strYear strDayDep = Trim(Request.Form("daydep")) strMonthDep = Trim(Request.Form("monthdep")) strYearDep = Trim(Request.Form("yeardep")) strEventdateDep = strDayDep & "/" & strMonthDep & "/" & strYearDep strPeople = Trim(Request.Form("people")) strMessage = Trim(Request.Form("message")) If EMailValidate(email) = False Or Len(name) < 1 Then strValidate = FALSE End If End If %> Contact Us

The Best of Both Worlds - Between Historic Rye and The Romney Marsh - Luxury Bed and Breakfast Accommodation Near Rye for the Discerning Guest