Aloha India, leader in advanced Abacus and Mental Arithmetic programs

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% option explicit %> <% Response.Buffer = True %> Aloha India, leader in advanced Abacus and Mental Arithmetic programs

Home

Careers

<% 'Declaring Variables Dim smtpserver,youremail,yourpassword,ContactUs_Email,myemail,cap,msgattached Dim ContactUs_Subject,ContactUs_Body,Action ' Edit these 3 values accordingly smtpserver = "mail.alohaindia.com" youremail = "itsupport@alohaindia.com" yourpassword = "Aloha@123" ' Grabbing variables from the form post myemail=Request("Toemail") ContactUs_Email = Request("Fromemail") ContactUs_Subject = Request("Subject") Action = Request("Action") If Action = "SendEmail" Then Dim strBody if Request("country")="India" then cap=Request("capital") else cap=Request("capital1") end if strBody="" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"

" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"" strBody=strBody&"

Personal Details

Name:

"&Request("title")&""&Request("mr")&"

Date of Birth

"&Request("dob")&"

Email ID

"&Request("mail")&"

Mobile

"&Request("mobile")&"

Address

"&Request("add")&"

" strBody=strBody&"

City

"&Request("city")&"

" strBody=strBody&"

State

"&Request("state")&"

"&Request("zip")&"

Country

"&Request("country")&"

Education Qualification

"&Request("education")&"

Work Experience

Current Job

"&Request("job")&"

Name

"&Request("name1")&"

Designation

"&Request("annual")&"

Period from Month Year

"&Request("employer")&"

Functional Area

"&Request("degree")&"

Industry Type

"&Request("product")&"

Resume

"&Request("file")&"

" Dim ObjSendMail Set ObjSendMail = CreateObject("CDO.Message") ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpserver ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = youremail ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = yourpassword ObjSendMail.Configuration.Fields.Update ObjSendMail.To = myemail ObjSendMail.Subject = ContactUs_Subject ObjSendMail.From = ContactUs_Email ObjSendMail.HTMLBody = strBody ObjSendMail.Attachments.Add(msgattached) ObjSendMail.Send Set ObjSendMail = Nothing %>

Thanks for showing interest in our organization. Your Resume is been updated in our database and will be considered for relevant job position
<% Else %>

If you are interested in a satisfying career with ALOHA INDIA then do apply to us