<% option explicit %> <% Dim strButton, strRecordID strButton = Request.Form("Button") strInputSource = "Post" IF strButton <> "" THEN 'i.e i a form has been submitted SELECT CASE strButton '************** - ADD NEW DOCUMENT CASE "Send Enquiry" Call s_ValidatePageAuto() ' call the validation script for this page to load variables into arrInputs CALL s_LoadInput("m_date","Date",f_FormatDateSqlIn( Now() ) ) CALL s_PrepInput("Enquiry","Enquiry Details") CALL s_valCheckString("R",0,999) IF strValErrors = "" THEN ' if there aren't any errors then send email Dim fSubject, fFromName, fFrom, fMessagetype, fBody, fCC Dim i fSubject = "Web Site Enquiry" fFromName = "website@" & replace(Application("SiteAddress"), "http://","") fFrom = "website@" & replace(Application("SiteAddress"), "http://","") fMessagetype = "html" fBody = "" fCC = "" fBody = fBody & "" For i = 0 to ubound(arrInputs) Step 3 IF arrInputs(i) <> "" THEN fBody = fBody & "" END IF Next fBody = fBody & "
" & f_EncHTML(arrInputs(i+1)) & "" & f_EncHTML(arrInputs(i+2)) & "
" CALL s_SendEmail(fSubject,fFromName,fFrom,Application("EmailRecipient"),fMessagetype,fBody,fCC) response.redirect("thankyou.htm") END IF END SELECT END IF %> Ashill Developments - Contact Us
skip to main content

Contact Us

Should you have a property or land holding that you think would be of interest to us, please contact us using the details shown below:

Ashill Developments
Hill Place House
55a High Street
Wimbledon Village
London
SW19 5BA

Tel: 020 8947 4333

General Enquiries: info@ashilldevelopments.co.uk

Map & Directions (new window)

back