|
|
Contact Recovery Insulation<% If request("submit") <> "" THEN Set objEMail = Server.CreateObject("CDO.Message") Set objConfig = Server.CreateObject("CDO.Configuration") Set Confi = objConfig.Fields Confi("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1 Confi("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "C:\inetpub\mailroot\pickup" Confi.Update Set objEMail.Configuration = objConfig objEMail.To = "info@recovery-insulation.co.uk,recovery@pluggingintothesun.org.uk,liamcrean@enventure.co.uk" objEMail.From = Request("from") objEMail.Subject = Request("subject") objEMail.TextBody = "Name: " & Request("name") & vbCRLF & "E-mail: " & Request("from") & vbCRLF & "Telephone: " & Request("telephone") & vbCRLF & "Address: " & Request("address") & vbCRLF & "Postcode: " & Request("postcode") & vbCRLF & "Subject: " & Request("subject") & vbCRLF & "Message: " & Request("message") objEMail.Send Set objEMail = Nothing Response.Write("Thank you for submitting your enquiry.A message a has been sent to Recovery Insulation and someone will contact you shortly.") Else %> This form is currently not working. Please email us * Please ensure your have entered you name, e-mail address & postcode so we are able to reply to your enquiry and give you the best quote possible. Please note: All information submitted will be treated as confidential and will not be passed on to 3rd parties. Alternatively you can contact us using the details below:
Recovery Insulation Ltd, Tel & Fax: +44 (0) 114 2499 459 |