Tony Miller - Contact

Contact Us

<% varGo = request.querystring("GO") IF varGO = "yes" OR Request.Form("pass") = "1" THEN varNumberConfirm1 = request.cookies("Number") varNumberConfirm2 = request.form("security") IF varNumberConfirm1 = varNumberConfirm2 THEN varComment = request.form("comments") varComment = replace(varComment,vbCrLf,"
") '========================================================================= ' SENDING EMAIL TO COMPANY '========================================================================= strbody = "" strbody = strbody & "" strbody = strbody & "<B>GENERAL ENQUIRY</B> from the Tony Miller Website" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "The following details have been transmitted to you
" strbody = strbody & "from the Website at: " & date() &" " &time() &"

" ' MAKING A NICE TABLE OF THE FORM RESULTS strbody = strbody & "

" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "
name " & Request.Form("name") &"
company " & Request.Form("company") &"
telephone " &Request.Form("telephone") &"
email " & Request.Form("email") &"
comments " & varComment &"
" strbody = strbody & "

" strbody = strbody & "This email was sent from your website server from the contact us form on the website" strbody = strbody & "" strbody = strbody & "" strbody = strbody & "" ' DO NOT TOUCH BELOW AS IT IS CRITICAL IN SENDING THE EMAILS '=========================================================== set mail = Server.CreateObject("Jmail.SMTPMail") mail.ServerAddress = "smtp.tony-miller.com.com:25" mail.HTMLBody = strbody varEmail = request.form("email") If varEmail = "" Then mail.Sender = "mailserver@tony-miller.com" Else mail.Sender = varEmail End IF mail.AddRecipient "tony@tony-miller.com" mail.AddRecipientBCC "mike@getonit.co.uk" mail.Subject = "Website Enquiry from the Tony Miller website" mail.Priority = 1 mail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR") mail.Execute set mail = Nothing %>

Thank you for contacting us

We have received your online enquiry form and will be dealing with it at the earliest opportunity

Kind Regards
the Tony Miller team.

Click here to go back to the home page.

<% ELSE response.write "Wrong or No Security Code Entered

" response.write "Click Here to go back and try again

" response.end END IF ELSE %>

For General Enquiries please use the details at the bottom of this page for telephone and address details or email info@tony-miller.com.

Alternatively for out of hours contact please use the online form provided below.

<% 'SECURITY NUMBER FOR FORM Randomize Number1 = (Int((10) * Rnd + 1)) Number2 = (Int((10) * Rnd + 1)) Number3 = (Int((10) * Rnd + 1)) varMyNumber = Number1 & Number2 & Number3 response.cookies ("Number") = varMyNumber varMyNumber2 = request.cookies("Number") %>

Name:

Telephone:

Company:

Email Address:

Question/Comments:

Enter Security Code

<% END IF %>

"Increased Profits - through people"