<% if request.form("do") = "1" then btext=""& VbCrLf for each x in request.form btext2=btext2 & x &": " & replace(replace(request.form(x),chr(10),""),chr(13),"
") & "
" next btext=btext & ""& VbCrLf Set myMail=CreateObject("CDO.Message") myMail.Subject="Morbihan Properties enquiry from website" myMail.From="info@morbihanproperties.co.uk" myMail.To="info@morbihanproperties.co.uk" myMail.HtmlBody=btext2 myMail.Send end if %> Morbihan Properties - Contact Us

[Home]
[Our Service]
[Properties]
[Contact]
 



<% if request.form("do") = "" then%>

Name:
Email:
Telephone:
Address:
Your enquiry:
 
<% else response.write("

Thanks for your enquiry!

We will get back to you as soon as possible.") 'response.write btext2 end if %>
© 2008 Morbihan Properties