Message Link - Contact us

<% Public Sub SendMyMail(fromEmail, ToEmail, Subject, BodyText) maildate = FormatDateTime(Date, vbLongDate) mailsubject = Request.Form("mailsubject") mailrecip = ToEmail mailcc = CC mailreplyto = Cstr(FromEmail) mailreturn = Request.Form("mailreturnurl") mailreturnlink_title = Request.Form("mailreturnlinktitle") sMessageText = Cstr(BodyText) Set objMail = Server.CreateObject("CDONTS.NewMail") '-- Set the Mail Properties 'objMail.MailDate = Now() objMail.Subject = Subject '- bodyformat 0 html email / 1 plain text objMail.BodyFormat = 1 objMail.MailFormat = 0 objMail.From = mailreplyto objMail.To = mailrecip objMail.Body = sMessageText objMail.Send Set objMail = Nothing End Sub strSubject = Request("mailsubject") strBody = "Name: "&Request("RealName")& vbcrlf & vbcrlf &"Company Name: "&Request("CompName")& vbcrlf & vbcrlf &"Email: "&Request("Email")& vbcrlf & vbcrlf &"Address: "&Request("Address")& vbcrlf & vbcrlf &"Tel: "&Request("Tel")& vbcrlf & vbcrlf &"Comments: "&Request("Comments") If Request("mailrecip")<>"" Then SendMyMail "website@message-link.co.uk","kevin@message-link.co.uk",strSubject,strBody End If %> Message Link - Contact us

If you would like further information please contact us at:

Message Link, 3 Tuffley Park, Lower Tuffley Lane, Gloucester, GL2 5DP
Freephone: 0500 532400 Fax: 01452 530305
Email: admin@message-link.co.uk

Download the location map to find us (pdf 88kb) >>>

<% If Request("mailrecip") = "" Then %>

" ID="Form1">

Name
Company Name
Address
Tel
Email
Comments

<% Else %>

Thank you. We will review you enquiry as soon as possible. <% End If %>

I would like to thank the team at Message Link for such a courteous, and professional approach to our business needs. Excellent customer service.

Mail Order Company

Message Link, 3 Tuffley Park, Lower Tuffley Lane, Gloucester, GL2 5DP | t:01452 532424 f:01452 530305