<%@ LANGUAGE = "VBScript" %> <% Option Explicit %> <%response.Expires = 0%> <%response.buffer=true%> <% dim name1, message, tel, submit, email,done submit = request("submit") if submit <>"" then email = request("email") name1 = request("thename") message = request("message") tel = request("tel") dim page page = "Enquiry response from website" page = page & Chr(13) & Chr(10) page = page & Chr(13) & Chr(10) page = page &"Name: "&name1 page = page & Chr(13) & Chr(10) page = page &"Telephone: "&tel page = page & Chr(13) & Chr(10) page = page &"Email: "&email page = page & Chr(13) & Chr(10) page = page &"Message: "&message page = page & Chr(13) & Chr(10) dim mailmsg Set mailmsg = Server.CreateObject("CDONTS.NewMail") mailmsg.To = "info@atrous.co.uk" mailmsg.Subject = "Enquiry Response from website" mailmsg.From = "info@atrous.co.uk" mailmsg.BodyFormat = "1" mailmsg.Host = "127.0.0.1" mailmsg.Body = page 'mailmsg.Retain = True mailmsg.send done = 1 end if %> Atrous Limited - Marketing and Sales Experts
Home
Services for your Business
Satisfied Customers
News and Feedback
Contact Atrous Limited

Get in Touch

13 Lime Tree Court, Napsbury Park
St Albans, Herts, AL2 1UL

Telephone: +44 (0)845 0098 760
FAX: +44 (0)845 0098 761
E-mail: info@atrous.co.uk


Enquiries <% if done = "" then %> <% else %> <% end if %>
You are welcome to contact Atrous Ltd. Using this form below. We will endeavour to contact you as soon as possible.
Name:
Telephone:
Email:
Message:
 
Thank you. Your details have been sent. We will be in contact in due course.
 
Copyright © 2006 Atrous Limited. All Rights Reserved.