Gridley Unified School District

<% QMainMenu="Select menu_id, menu_name, menu_order, menu_parent, menu_display from menu Where menu_parent = 0 and menu_display = 1" set GetMainMenu=ObjDBConn.execute(QMainMenu) set buildmenu=ObjDBConn.execute(QMainMenu) QMainMenudisabled="Select menu_id, menu_name, menu_order, menu_parent, menu_display from menu Where menu_parent = 0 and menu_display = 0" set GetMainMenudisabled=ObjDBConn.execute(QMainMenudisabled) DIM menuID DIM submenuID menuID = request.querystring("id") submenuID = request.querystring("subid") If menuID = "" Then menuID = 1 End If QSubMenu="Select menu_id, menu_name, menu_order, menu_parent, menu_display from menu Where menu_parent = " & cint(menuID) & "and menu_display = 1" set GetSubMenu=ObjDBConn.execute(QSubMenu) QSubMenudisabled="Select menu_id, menu_name, menu_order, menu_parent, menu_display from menu Where menu_parent = " & cint(menuID) & "and menu_display = 0" set GetSubMenudisabled=ObjDBConn.execute(QSubMenudisabled) QEmerg="Select emergID, emerg, display, updatestamp from Emergency where display=1" set GetEmerg=ObjDBConn.execute(QEmerg) %> Gridley Unified School District

	GUSD	429 Magnolia Street Gridley, CA 95948
	Gridley Unified School District	429 Magnolia Street Gridley, CA 95948

<% end if %> <% do while not GetEmerg.eof %> <% If GetEmerg(2) = true Then %> <% End If %> <%GetEmerg.movenext loop%>

><%= UCASE(GetMainMenu(1)) %>

<% If Session("UID") Then %>

><%= UCASE(GetMainMenudisabled(1)) %>

<%= GetEmerg(0) %>- <%= GetEmerg(1) %>-<%= GetEmerg(2) %>-<%= GetEmerg(3) %>


<% do while not GetSubMenu.eof %> ><%= GetSubMenu(1) %> <%GetSubMenu.movenext loop%> <% If Session("UID") Then %> New Page Logout <% End If %> <% If Session("UID") Then %> <% do while not GetSubMenudisabled.eof %> ><%= GetSubMenudisabled(1) %> <%GetSubMenudisabled.movenext loop%> <% End If %>

Body

Footer