%@ Language=VBScript %>
<%
dim objMail, strMsg, HTML, iConf
if Request.Querystring("String") = "sndmail" then
set objMail = CreateObject("CDO.Message")
HTML = ""
HTML = HTML & ""
HTML = HTML & "
"
HTML = HTML & "Enquiry From The Campus Abroad"
HTML = HTML & ""
HTML = HTML & ""
HTML = HTML & " Name: "
HTML = HTML & Request.Form("txtgenre")&". "&Request.Form("txtfirst")&" "&Request.Form("txtmiddle")&" "&Request.Form("txtlast")
HTML = HTML & " Nationality: "
HTML = HTML & Request.Form("txtnation")
HTML = HTML & " Address: "
HTML = HTML & Request.Form("txtaddress")
HTML = HTML & " Email Id: "
HTML = HTML & Request.Form("txtemail")
HTML = HTML & " Tel/Mobile: "
HTML = HTML & Request.Form("txtmobile")
HTML = HTML & " Educational Qualification: "
HTML = HTML & Request.Form("txtedu")
HTML = HTML & " Interested Country: "
HTML = HTML & Request.Form("txtcountry")
HTML = HTML & " Interested Study Area: "
HTML = HTML & Request.Form("txtstudyarea")
HTML = HTML & " Level of Study: "
HTML = HTML & Request.Form("txtlevel")
HTML = HTML & " General Enquiries: "
HTML = HTML & Request.Form("txtenquiry")
HTML = HTML & ""
HTML = HTML & ""
objMail.From = Request.Form("txtemail")
objMail.To = "info@campus-abroad.com"
objMail.Bcc = "collegestoday@gmail.com"
objMail.Subject = "Enquiry From Campus Abroad Website"
'objMail.Body = Request.Form("requirements")
objMail.HTMLBody = HTML
objMail.Send
set objMail = nothing
strMsg = "sent"
end if%>
Register CAMPUS ABROAD-India's First Overseas Educational Counsellors and Promoters - UK, USA, Canada, Singapore, Australia, Ireland, Cyprus, Spain, Switzerland,
Malaysia, Italy, France, Germany, New Zealand, Netherland, Dubai, Panama Universities/Colleges-Your International Highway to Overseas Education