 |
 |
<%
if request.form("submit")="" or isnull(request.form("submit")) then
%>
We find the best way to help you is to talk to you, that way you don't have to try and put your idea down in words, and we don't have to try to guess what you want.
So... what you waiting for, call us now for a chat on 0794 169 3678
<%
else
Body = Body & "Name / Company: " & request.form("Name") & vbCrLf
Body = Body & "Address: " & request.form("Address") & vbCrLf
Body = Body & "Phone: " & request.form("Phone") & vbCrLf
Body = Body & "Website: " & request.form("Website") & vbCrLf
Body = Body & "Email: " & request.form("Email") & vbCrLf
Body = Body & "Require: " & request.form("How")
if (instr(Body, "bcc") > 0 or instr(Body, "@enticom") > 0)then
response.Redirect("default.php")
else
' send email
' sales@drcookerhoods.co.uk
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = "Enticom Contact Form"
Mailer.FromAddress= "noreply@enticom.co.uk"
Mailer.RemoteHost = "mrvnet.kundenserver.de"
Mailer.AddRecipient "neil@enticom.co.uk", "neil@enticom.co.uk"
Mailer.Subject = "Contact Form - (www.enticom.co.uk)"
Mailer.BodyText = Body
if Mailer.SendMail then
Response.Write "
Thank You
Please click here to continue."
else
Response.Write "Mail send failure. Error was " & Mailer.Response
end if
end if
end if
%>
|
 |
|