International students who wish to study in Australia apply here .           Personal Info Pre-Education Education Experience General
Personal Information
		REQUIRED fields
Given Name(s)
Surname
Phone Prefix Codes
Phone No.
Mobile
Email
Address City, State
Sex		Female Male
Date of Birth
Place of Birth
Country of Birth
Nationality
Country of Residence
Marital Status		Married Unmarried Divorced
Dependent Children (if any)
Approx. Annual Family Income
Course/Subject admission sought
Level (Diploma/Graduation/ Masters/PhD
How would you finance study in Australia

Personal Info Pre-Education Education Experience General
Basic Education
REQUIRED fields
Qualification
Institute, Board/University
Year of Completion
Marks/Grades
Medium of Instruction
Professional/Technical Education
Qualification
Institute, Board/University
Year of Completion
Marks/Grade
Medium of Instruction
More Qualification? (Selecting it will provide more input fields for education.

Perssoanl Info Pre-Education Education Experience General
Professional/Technical Education-2
		REQUIRED fields
Qualification
Institute, Board/University
Year of Completion
Marks/Grade
Medium of Instruction
Professional Education-3
Qualification
Institute, Board/University
Year of Completion
Marks/Grade
Medium of Instruction

Perssoanl Info Pre-Education Education Experience General
Membership with Technical/Professional Bodys
REQUIRED fields
Registered as
Registered No
Complete detail of the releavnt govt body registered with
Registered since
Work Experience-1
Employer Name
Emplaoyers Address & Tel No
Position held
Type of work
Monthly Salary
Duration (from-to)
More work Expereince? (Selecting this will provide more inout fields for education.

Perssoanl Info Pre-Education Education Experience General
Work Experience-2
		REQUIRED fields
Employer Name
Emplaoyers Address & Tel No
Position held
Type of work
Monthly Salary
Duration (from-to)
Work Experience-3
Employer Name
Emplaoyers Address & Tel No
Position held
Type of work
Monthly Salary
Duration (from-to)

<% case "6": ' Step 6 %>

Perssoanl Info Pre-Education Education Experience General
English Language
REQUIRED fields
Have you ever appeared in any of the international english langauge tests? If yes the please fill teh follwing section.
Name of the Test
Overall Score/Band
Date Appeared
Referees
Referee 1: Name, Address, Email, Telephone No.
Referee 2: Name, Address, Email, Telephone No.
Any additional information you desire to offer.
How did you come to know about Sapanta Consultants		Search Engines Newspaper Ad Education Work Place Friends Direct Contact Sapanta Agent Sapanta Seminars

<% case "7": ' Step 7%>

<% Response.write("Anexxure:
Following are the information you submitted to Sapanta Consultants:

") Response.write("") for n=1 to 6 Response.write("") postring=postring & vbcrlf & vbcrlf postring=postring & "Section: " & n postring=postring & vbcrlf & vbcrlf if n=1 then Response.write("") postring=postring & "Personal Information" postring=postring & vbcrlf postring=postring& vbcrlf & vbcrlf end if if n=2 then Response.write("") postring=postring & "Education" postring=postring & vbcrlf postring=postring& vbcrlf & vbcrlf end if if n=3 then Response.write("") postring=postring & "Addition Section (Education-Cont.)" postring=postring & vbcrlf Postring=postring & "If no information provided than submitted blank" postring=postring& vbcrlf & vbcrlf end if if n=4 then Response.write("") postring=postring & "Registrations & Experience" postring=postring & vbcrlf postring=postring& vbcrlf & vbcrlf end if if n=5 then Response.write("") postring=postring & "Addition Section (Experience-Cont.)" postring=postring & vbcrlf postring=postring & "If no information provided than submitted blank" postring=postring & vbcrlf & vbcrlf end if if n=6 then Response.write("") postring=postring & "Language & General: " & n postring=postring & vbcrlf postring=postring& vbcrlf & vbcrlf end if for each i in Request.Form if left(i,2)="s" & n then Dim abc abc=Request.Form(i) if len(abc)=0 then abc="Not Provided" end if Response.write("") postring=postring + Right(i, len(Trim(i))-3) & ": " & abc postring=postring & vbcrlf end if next next 'response.write("") response.write("

Section: " & n & "
Personal Information
Education
Additional Education (if no info provided than submitted blank)
Registrations & Experience:
Additional Exprience (if no info provided than submitted blank)
Language & General
" & Right(i, len(Trim(i))-3) & "	" & abc & "

") end select If postring <> "" then 'Declare variables Dim sMsg Dim sTo Dim sFrom Dim sSubject Dim sTextBody Dim sHTMLBody postring=Cstr(postring) 'Get data from previous page sTo = "info@sapanta.com.au" sFrom = """"& "Postmaster-Sapanta" &""" <"& "postmaster@sapanta.com.au" &">" sSubject = "New Application (Education) Alert!" ' Subject of the message sTextBody = postring 'sHTMLBody = strMsg 'Only run this if it's not the first time 'If Request.Form("Submit") <> "" Then Dim objMail 'Create the mail object Set objMail = Server.CreateObject("CDO.Message") 'Set key properties objMail.From = sFrom objMail.To = sTo objMail.Subject= sSubject objMail.TextBody = sTextBody 'objMail.Priority = High 'objMail.HTMLBody = sHTMLBody 'Send the email objMail.Send 'Set sMsg which will be used later 'sMsg = "Your message was sent to: " & sTo 'Clean-up Set objMail = Nothing ''Set objMail = CreateObject("CDONTS.NewMail") ' objMail.From="postmaster@sapanta.com.au" ''objMail.From= """"& "Postmaster-Sapanta" &""" <"& "postmaster@sapanta.com.au" &">" 'response.write "From=postmaster@sapanta.com.au" ''objMail.To= "info@sapanta.com.au" 'response.write "to=technical@limelightglobal.com" ''objMail.Subject="New Application (Education) Alert!" ' Subject of the message 'response.write(postring) ''objMail.Body=postring ''objMail.Send ''Set objMail = nothing response.write("

Thanks for applying. A consultant will contact you as soon as possible.

Please bear with us.") end if %>