<% Session.Timeout=1200 Server.ScriptTimeout=60000 EmailBody = " "&_ " "&_ "Registration Details "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ " "&_ "
Registration Details
Name :  "&Request.Form("TheName")&"
Email Address :  "&Request.Form("Email")&"
Cell Number :  "&Request.Form("Mobile")&"
Work Address :  "&Request.Form("Address_Work")&"
Home Address :  "&Request.Form("Address_Home")&"
Routes :  "&Request.Form("RouteList")&"
"&_ " "&_ " " Sub sendMail1(toWho) DIM theMail SET theMail = Server.CreateObject("CDONTS.Newmail") theMail.MailFormat = 0 theMail.BodyFormat = 0 theMail.From = "Web Registration Bot " theMail.To = toWho theMail.Subject = "Jam Alert Registration" theMail.body = EmailBody theMail.send Set theMail=NOTHING End Sub sendMail1 "roger@jamalert.co.za" %> JAM ALERT!
home introduction service costs available areas call centres contact details subscribe now
 

Thank you for subscribing to JAM ALERT!

 
         
  The following details have been sent:

 
  Routes:
<% Response.Write(Request.Form("RouteList") & "
") %> Personal Details:
<% Response.Write(Request.Form("TheName") & "
") Response.Write(Request.Form("Mobile") & "
") Response.Write(Request.Form("Email") & "
") Response.Write(Request.Form("Address_Work") & "
") Response.Write(Request.Form("Address_Home") & "
") Response.Write(Request.Form("Credit_Card_Details") & "
") Response.Write(Request.Form("Expiry_Date") & "
") %>
 
         
 

JAM ALERT!  © Copyright 2003. All Rights Reserved