International nurses who desire to work 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

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

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

Personal Info Pre-Education Education Experience General
Registrations
REQUIRED fields
Registered as
Registered No
Complete detail of the relevant Gov. body registered with
Registered since
Work Experience-1
Employer Name
Employer's Address & Tel No
Position held
Type of work
Monthly Salary
Duration (from-to)
More work experience? (Selecting this will provide more input fields for education.

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

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

Personal Info Pre-Education Education Experience General
English Language
REQUIRED fields
Have you ever appeared in any of the international English language tests? If yes the please fill the following 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 = "health@sapanta.com.au" sFrom = """"& "Postmaster-Sapanta" &""" <"& "postmaster@sapanta.com.au" &">" sSubject = "New Application (Health) 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= "taseer@sapanta.com.au" 'response.write "to=technical@limelightglobal.com" ''objMail.Subject="New Application (Health) 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 %>