% SELECT CASE strGO case "schools": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|bookings|")>0) THEN strSC = sanitizeRequest("schools","querystring") SELECT CASE strSC case "add": Server.Execute("/super-user/scripts/schools/add.asp") case "view": Server.Execute("/super-user/scripts/schools/view.asp") case "edit": Server.Execute("/super-user/scripts/schools/edit.asp") case else: Server.Execute("/super-user/scripts/schools/main.asp") END SELECT ELSE response.write("
You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "pupils": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|customers|")>0) THEN strPU = sanitizeRequest("pupils","querystring") SELECT CASE strPU case "add": Server.Execute("/super-user/scripts/pupils/add.asp") case "view": Server.Execute("/super-user/scripts/pupils/view.asp") case "edit": Server.Execute("/super-user/scripts/pupils/edit.asp") case else: Server.Execute("/super-user/scripts/pupils/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "parents": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|customers|")>0) THEN strPA = sanitizeRequest("parents","querystring") SELECT CASE strPA case "add": Server.Execute("/super-user/scripts/parents/add.asp") case "view": Server.Execute("/super-user/scripts/parents/view.asp") case "edit": Server.Execute("/super-user/scripts/parents/edit.asp") case else: Server.Execute("/super-user/scripts/parents/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "drivers": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|drivers|")>0) THEN strDRV = sanitizeRequest("drivers","querystring") SELECT CASE strDRV case "add": Server.Execute("/super-user/scripts/drivers/add.asp") case "edit": Server.Execute("/super-user/scripts/drivers/edit.asp") case "view": Server.Execute("/super-user/scripts/drivers/view.asp") case "statements": Server.Execute("/super-user/scripts/drivers/statements.asp") case else: Server.Execute("/super-user/scripts/drivers/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "location": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|coverage|")>0) THEN strLOC = sanitizeRequest("location","querystring") SELECT CASE strLOC case "view": Server.Execute("/super-user/scripts/location/view.asp") case "test": Server.Execute("/super-user/scripts/location/mainNEW.asp") case else: Server.Execute("/super-user/scripts/location/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "routes": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|routes|")>0) THEN strCVG = sanitizeRequest("routes","querystring") SELECT CASE strCVG case "add": 'Server.Execute("/super-user/scripts/routes/add.asp") case else: Server.Execute("/super-user/scripts/routes/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "routestest": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|routes|")>0) THEN strCVG = sanitizeRequest("routes","querystring") SELECT CASE strCVG case "add": 'Server.Execute("/super-user/scripts/routestest/add.asp") case else: Server.Execute("/super-user/scripts/routestest/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "itinerary": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|settings|")>0) THEN strITN = sanitizeRequest("itinerary","querystring") SELECT CASE strITN case "edit": Server.Execute("/super-user/scripts/itinerary/edit.asp") case else: Server.Execute("/super-user/scripts/itinerary/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "reports": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|settings|")>0) THEN strITN = sanitizeRequest("reports","querystring") SELECT CASE strITN case "edit": Server.Execute("/super-user/scripts/reports/main.asp") case else: Server.Execute("/super-user/scripts/reports/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "safety": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|safety|")>0) THEN strSAF = sanitizeRequest("safety","querystring") SELECT CASE strSAF case "edit": Server.Execute("/super-user/scripts/safety/main.asp") case else: Server.Execute("/super-user/scripts/safety/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case "users": IF str_u_lev="0" THEN strUM = sanitizeRequest("users","querystring") SELECT CASE strUM case "add": Server.Execute("/super-user/scripts/users/add.asp") case "view": Server.Execute("/super-user/scripts/users/view.asp") case else: Server.Execute("/super-user/scripts/users/main.asp") END SELECT ELSE response.write("You do not have permission to view this page
") response.write("go back to the previous page
") END IF case else: Server.Execute("/super-user/scripts/dashboard/main.asp") END SELECT %>