% IF str_first_login="1" THEN 'parent needs to set their password Server.Execute("/parents/scripts/dashboard/setpasswordonfirstlogon.asp") ELSE SELECT CASE strGO case "accountdetails": IF str_u_lev="0" OR str_u_allowed="all" OR (InStr(str_u_allowed,"|customers|")>0) THEN strAD = sanitizeRequest("accountdetails","querystring") SELECT CASE strAD case "add": Server.Execute("/parents/scripts/accountdetails/add.asp") case "view": Server.Execute("/parents/scripts/accountdetails/view.asp") case "edit": Server.Execute("/parents/scripts/accountdetails/edit.asp") case else: Server.Execute("/parents/scripts/accountdetails/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" AND parent_setting_location="yes" OR str_u_allowed="all" AND parent_setting_location="yes" OR (InStr(str_u_allowed,"|location|")>0) AND parent_setting_location="yes" THEN strLOC = sanitizeRequest("location","querystring") SELECT CASE strLOC case "view": Server.Execute("/parents/scripts/location/view.asp") case else: Server.Execute("/parents/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 "reports": IF str_u_lev="0" AND parent_setting_reporting="yes" OR str_u_allowed="all" AND parent_setting_reporting="yes" OR (InStr(str_u_allowed,"|reports|")>0) AND parent_setting_routes="yes" THEN strITN = sanitizeRequest("reports","querystring") SELECT CASE strITN case "edit": Server.Execute("/parents/scripts/reports/main.asp") case else: Server.Execute("/parents/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 "routes": IF str_u_lev="0" AND parent_setting_routes="yes" OR str_u_allowed="all" AND parent_setting_routes="yes" OR (InStr(str_u_allowed,"|routes|")>0) AND parent_setting_routes="yes" THEN strRTE = sanitizeRequest("routes","querystring") SELECT CASE strRTE case "create": Server.Execute("/parents/scripts/routes/main.asp") case else: Server.Execute("/parents/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 "support": IF str_u_lev="0" AND parent_setting_support="yes" OR str_u_allowed="all" AND parent_setting_support="yes" OR (InStr(str_u_allowed,"|support|")>0) AND parent_setting_support="yes" THEN strSUP = sanitizeRequest("support","querystring") SELECT CASE strSUP case "create": Server.Execute("/parents/scripts/support/create.asp") case "viewticket": Server.Execute("/parents/scripts/support/view/index.asp") case else: Server.Execute("/parents/scripts/support/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": strSAF = sanitizeRequest("safety","querystring") SELECT CASE strSUP case "create": Server.Execute("/parents/scripts/safety/main.asp") case else: Server.Execute("/parents/scripts/safety/main.asp") END SELECT case else: Server.Execute("/parents/scripts/dashboard/main.asp") END SELECT END IF %>