<%@Language="VbScript"%> <% If request.Form("hdnSubmit")="T" then Dim objNewMail Dim EmailBody Dim varSubject Set objNewMail = Server.CreateObject("CDONTS.NewMail") varSubject = "Request for quote from the Internet" objNewMail.To = "richie_jc@hotmail.com" objNewMail.Subject = varSubject objNewMail.From = request.Form("txtEmail") EmailBody = "Name :" + request.Form("txtName") + chr(13) EmailBody = EmailBody + "Email :" + request.Form("txtEmail") + chr(13) EmailBody = EmailBody + "Phone :" + request.Form("txtPh") + chr(13) EmailBody = EmailBody + "From :" + request.Form("txtFrom") + " To:" + request.Form("txtTo") + chr(13) EmailBody = EmailBody + "Dates of travel Start:" + request.Form("txtStartdate") + " Return:" + request.Form("txtRetdate") + chr(13) objNewMail.Body = EmailBody objNewMail.Send Set objNewMail = Nothing End if %> Sudha Travels

 

              
  

 CC Auth Form
 
 

 
Name                
Your Email               
Your Phone#               
Cities traveling FROM :                        TO :
Dates of Travel START:       RETURN: