%@LANGUAGE="VBSCRIPT"%>
<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" then
msgBody = "Name : " & Request.Form("name") & VbCrLf
msgBody = msgBody & "EMail : " & Request.Form("email") & VbCrLf
msgBody = msgBody & "Telephone : " & Request.Form("telephone") & VbCrLf
msgBody = msgBody & "Request Contact : " & Request.Form("request_contact") & VbCrLf
msgBody = msgBody & "Comments : " & Request.Form("comments")
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = Request.Form("name")
Mailer.FromAddress= Request.Form("email")
Mailer.RemoteHost = "pop3.gatorsa.co.za"
Mailer.AddRecipient "Greg", "info@gatorsa.co.za"
Mailer.Subject = "GatorSA Contact Request"
Mailer.BodyText = msgBody
if Mailer.SendMail then
Response.Redirect("ThankYou.htm")
else
Response.Write "Mail send failure. Error was " & Mailer.Response
end if
End If
%>
Steritech
Western Cape
Two Ten Cape (Pty) Ltd.
P O Box 344
Noordhoek 7979
Tel: +27 (0)21 783 3310
Fax: +27 (0)21 783 3310
Email: peter@twotenchemicals.co.za
Contact: Peter Lang.