<% strSQL = "SELECT cbk_pupils.pupilID As pupilID, cbk_pupils.roleID As roleID, cbk_pupils.schoolID As schoolID, cbk_pupils.name As name, cbk_schools.schoolname As schoolname FROM cbk_pupils LEFT JOIN cbk_schools ON cbk_pupils.schoolID = cbk_schools.schoolID WHERE cbk_pupils.pupilID > '0'" IF request("q")<> "" THEN q=sanitizeRequest("q","querystring") strSQL=strSQL & " AND cbk_pupils.pupilID='"&q&"'" strSQL=strSQL & " OR cbk_pupils.name LIKE '%"&q&"%'" strSQL=strSQL & " OR cbk_pupils.email LIKE '%"&q&"%'" ELSE q="" strSQL=strSQL & osqlSTR END IF IF request("cType")<> "" THEN ct=sanitizeRequest("cType","querystring") strSQL=strSQL & " AND cbk_pupils.schoolID='"&ct&"'" ELSE ct="" strSQL=strSQL & osqlSTR END IF s=sanitizeRequest("sOrder","querystring") SELECT CASE s case "nameasc": oBy=" order by cbk_pupils.name asc" case "namedesc": oBy=" order by cbk_pupils.name desc" case else: oBy=" order by cbk_pupils.name asc" END SELECT strSQL=strSQL & oBy strCSQL = replace(strSQL,"SELECT cbk_pupils.pupilID As pupilID, cbk_pupils.roleID As roleID, cbk_pupils.schoolID As schoolID, cbk_pupils.name As name, cbk_schools.schoolname As schoolname","SELECT count(*) AS rCount") SET rsBC = dbCBK.Execute(strCSQL) rCount=0 DO WHILE NOT rsBC.EOF rCount=CInt(rsBC("rCount")) rsBC.MoveNext loop rsBC.Close SET rsBC = Nothing 'results per page perpage=100 'number of pages nPages=CInt(rCount/perpage) IF nPages < 1 THEN nPages=1 END IF 'current page curPage=sanitizeRequest("page","querystring") IF (curPage <> "") THEN IF IsNumeric(curPage) AND curPage > "0" THEN curPage=Cint(curPage) ELSE curPage=1 END IF ELSE curPage=1 END IF IF curPage > nPages THEN curPage=nPages END IF endPoint=perPage*curPage startPoint=endPoint-perPage strSQL=strSQL & " limit " & startPoint & ", " & perpage 'response.write(strSQL & "

") 'response.write(strCSQL) SET rsB=dbCBK.Execute(strSQL) %> <%IF rsB.EOF THEN%> <%ELSE%>

None found.

<%IF curPage > 1 THEN%> previous <%ELSE%> previous <%END IF%>

Page <%=curPage%> of <%=nPages%> (<%=rCount%> found)

<%IF npages > curPage THEN%> next <%ELSE%> next <%END IF%>