%@ language=vbscript %>
<%
if Request.ServerVariables("content_length") <> 0 then
SUB sendMail( email,body )
DIM myMail
Set mymail = Server.CreateObject("SMTPsvg.Mailer")
mymail.ContentType = "text/html"
mymail.RemoteHost = "mail.indiatourspackages.com"
mymail.FromAddress = "info@indiatourspackages.com"
mymail.AddRecipient "indiatourspackages","info@indiatourspackages.com"
mymail.AddBCC "Neuro Nimbus","vipul@neuronimbus.com"
mymail.FromName=email
mymail.Subject="Contact us filled through indiatourspackages.com"
mymail.BodyText=body
mymail.Sendmail
set mymail=nothing
END SUB
firstname=TRIM(Request.Form ("firstname"))
lastname=TRIM(Request.Form ("lastname"))
address1 = TRIM( Request.Form( "address1" ))
address2 = TRIM( Request.Form( "address2" ))
phone = TRIM( Request.Form( "phone" ))
mobile = TRIM( Request.Form("mobile"))
email =TRIM( Request.Form( "email" ))
confirmemail =TRIM( Request.Form( "confirmemail" ))
specificrequirement = TRIM( Request.Form("specificrequirement"))
body2="
" &_
"
firstname
" &_
"
: "+firstname +"
" &_
"
" &_
"
" &_
"
lastname
" &_
"
: "+lastname + "
" &_
"
" &_
"
" &_
"
address1
" &_
"
: "+address1 + "
" &_
"
" &_
"
" &_
"
address2
" &_
"
: " +address2+ "
" &_
"
" &_
"
" &_
"
phone
" &_
"
: "+phone+"
" &_
"
" &_
"
" &_
"
mobile
" &_
"
: "+mobile+"
" &_
"
" &_
"
" &_
"
email
" &_
"
: "+email+ "
" &_
"
" &_
"
" &_
"
comment
" &_
"
: "+specificrequirement+ "
" &_
"
"
' response.Write(body2)
sendMail email, body2
Response.Redirect "thank.asp"
end if
%>
India tour operator India Tour Packages Tours for India Tour for India Hotels in India Hotel Reservation Packages in India Tour Packages for India India tour Travel to India India travel Tour packages Indian holiday India Travel