<% if len(request("school"))<4 then response.write "alert('Please enter name of school');window.history.back();" end if if not isNumeric(request("distance")) then response.write "alert('Distance should be numeric');window.history.back();" end if if not isNumeric(request("rule")) then response.clear response.write "alert('Rule number should be numeric');window.history.back();" response.end end if DBASEconnect(server.mappath("/")&dbdirectory&"/me") schoolTable = DBASEjn("Schools",Array(),"~scls-"&request("school")&"~") newTable = schoolTable if ubound(newTable)=0 then schoolname = DBASEgetField(newTable(0),"SC1") schoolid = DBASEgetField(newTable(0),"SC0") else response.write "alert('Not enough information available about this school');window.history.back();" end if newTable = DBASEjn("YearInfo",Array(),"~>SC0-"&schoolid&"~") extraTable = filter(newTable,"~SI4-"&request("parish")&"~") if ubound(extraTable)>-1 then newTable = extraTable else extraTable = filter(newTable,"ANY OTHER PARISH") if ubound(extraTable)>-1 then newTable = extraTable end if end if newTable = DBASEsort(newTable,"SI6") uKey = getSessVar("uKey") memtype = getAppVar(uKey&"auth") membership = "FAIL" if instr("," & replace(memtype," ","") & "," ,",mem,") > 0 then memTable = DBASEjn("users",Array(),"~1-"&uKey&"~") if ubound(memTable) = 0 then paidTable = DBASEjn("Membership",Array(),"~MB2-" & DBASEgetField(memTable(0),"4") & "~") if ubound(paidTable) = 0 then membership = "OK" end if end if end if if membership <> "OK" then response.write "

To find out if you would have got a place, please sign up for an account it costs 25 for 1 year unlimited access.

" else response.write "

Report for "&schoolname&"

" response.write "

" tablestart = 0 if ubound(newTable) > 4 then tablestart = ubound(newTable)-4 end if numstars = 0 numunk = 0 response.write "SchoolGuru rates your chance of getting a place at "&schoolname&" as:
" for ff = ubound(newTable) to tablestart step -1 if DBASEgetField(newTable(ff),"SIH") = "ALL" then numstars = numstars + 1 elseif DBASEgetField(newTable(ff),"SIH") = "N/A" then numunk = numunk + 1 elseif cint(request("rule")) < cint(DBASEgetField(newTable(ff),"SIH")) then numstars = numstars + 1 elseif cint(request("rule")) = cint(DBASEgetField(newTable(ff),"SIH")) then if isNumeric(DBASEgetField(newTable(ff),"SII")) then if isNumeric(DBASEgetField(newTable(ff),"SII")) then if cdbl(request("distance")) < cdbl(DBASEgetField(newTable(ff),"SII")) then numstars = numstars + 1 end if end if end if end if next numyears = ubound(newTable)-tablestart+1-numunk placeType = numstars & "/" & numyears if placeType = "0/0" then response.write "See Notes below. Due to the complexity of the Rules, you will need to assess your situation using the data provided." elseif placeType = "0/1" then response.write "Poor" elseif placeType = "1/1" then response.write "Good " elseif placeType = "0/2" then response.write "Poor" elseif placeType = "1/2" then response.write "Fair " elseif placeType = "2/2" then response.write "Good " elseif placeType = "0/3" then response.write "Poor" elseif placeType = "1/3" then response.write "Slim " elseif placeType = "2/3" then response.write "Fair " elseif placeType = "3/3" then response.write "Good " elseif placeType = "0/4" then response.write "Poor" elseif placeType = "1/4" then response.write "Slim " elseif placeType = "2/4" then response.write "Fair " elseif placeType = "3/4" then response.write "Good " elseif placeType = "4/4" then response.write "Excellent " elseif placeType = "0/5" then response.write "Very poor" elseif placeType = "1/5" then response.write "Poor " elseif placeType = "2/5" then response.write "Slim " elseif placeType = "3/5" then response.write "Fair " elseif placeType = "4/5" then response.write "Good " elseif placeType = "5/5" then response.write "Excellent " else response.write "Unknown" end if response.write "

" response.write "

" response.write "You would have been offered a place
" response.write ""&numstars&" times in the last "&ubound(newTable)-tablestart+1&" years" response.write "

" response.write "

" for ff = ubound(newTable) to tablestart step -1 response.write DBASEgetField(newTable(ff),"SI6")&" " if DBASEgetField(newTable(ff),"SIH") = "ALL" then response.write "" elseif DBASEgetField(newTable(ff),"SIH") = "N/A" then response.write "" elseif cint(request("rule")) < cint(DBASEgetField(newTable(ff),"SIH")) then response.write "" elseif cint(request("rule")) = cint(DBASEgetField(newTable(ff),"SIH")) then if isNumeric(DBASEgetField(newTable(ff),"SII")) then if cdbl(request("distance")) < cdbl(DBASEgetField(newTable(ff),"SII")) then response.write "" else response.write "" end if else response.write DBASEgetField(newTable(ff),"SIJ") & " Probability (places allocated by lottery)" end if else response.write "" end if response.write "
" next response.write "

" response.write "

Notes:
"&replace(DBASEgetField(newTable(ubound(newTable)),"SIK"),"_"," ")&"

" end if %>

<% response.write "

Summary of details

" response.write "

School information:

" response.write "

Name of school: "&schoolname&"

" response.write "

Type of school: "&replace(DBASEgetField(schoolTable(0),"SC8"),"_"," ")&"

" response.write "

Address of school: " & DBASEgetField(schoolTable(0),"SCB") & " " & DBASEgetField(schoolTable(0),"SCC") & " " & DBASEgetField(schoolTable(0),"SCD") & " " & DBASEgetField(schoolTable(0),"SCE") & " " & DBASEgetField(schoolTable(0),"SCF") & "

" response.write "

Telephone: "&replace(DBASEgetField(schoolTable(0),"SCI"),"_"," ")&"

" response.write "

Email: "&replace(DBASEgetField(schoolTable(0),"SCH"),"_"," ")&"

" response.write "

Age Range: "&replace(DBASEgetField(schoolTable(0),"SC3"),"_"," ")&"

" if DBASEgetField(schoolTable(0),"SCM") <> "" then response.write "

Religious Character: "&replace(DBASEgetField(schoolTable(0),"SCN"),"_"," ")&"

" end if if DBASEgetField(schoolTable(0),"SCM") <> "" then response.write "

Capacity: "&replace(DBASEgetField(schoolTable(0),"SCO"),"_"," ")&"

" end if response.write "

Your admissions criteria:

" response.write "

Admission category: "&request("rule")&"

" response.write "

Distance from school: "&request("distance")&" metres

" response.write "

Useful links:

" response.write "

View Ofsted report

" response.write "

School Profile

" response.write "

School Website

" %>

The Admission Calculator is powered by data from Hertfordshire County Council and schools across the county. It remains their copyright.

Remember: SchoolGuru offers predictions for the future, based on the past. There are no guarantees, warranties or Three Degrees... so please bear that in mind when using the site.

School admissions:
Primary schools Admission Calculator
Secondary schools Admission Calculator
Herts school appeals:
Appeals advice
School appeals guides