<%=school_name%>

<% ID = Request.QueryString("num") set conn=Server.CreateObject("ADODB.Connection") conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\fpdb\CyberSchool.mdb")) 'Select relevant data from the cyberschools table and store it in the recordset "school" SQL = "SELECT id, school_name, address, state, city, phone, email" SQL = SQL & ", school_color1, school_color2" SQL = SQL & ", Contact_1_Title, Contact_1_Name, Contact_2_Title, Contact_2_Name, Contact_3_Title, Contact_3_Name, Contact_4_Title, Contact_4_Name" SQL = SQL & ", PTOSchedule, studentofthemonth, parentofthemonth " SQL = SQL & "FROM cyberschools " SQL = SQL & "WHERE id = " & ID set school= conn.execute(SQL) 'The following items were stored in variables due to that mysterious bug that causes information not to be displayed school_name = school("school_name") address = school("address") state = school("state") city = school("city") %> <%=school_name%>

.jpg" width="200" height="154">

" width="100%">

<%=school_name%>

<%=school_name%>
<%=address%>
<%=school("phone")%>
"><%=school("email")%>

<%=school("Contact_1_Title")%> <%=school("Contact_1_Name")%>
<%=school("Contact_2_Title")%> <%=school("Contact_2_Name") %>
<%=school("Contact_3_Title")%> <%=school("Contact_3_Name") %>
<%=school("Contact_4_Title")%> <%=school("Contact_4_Name") %>

Map to School

">Main Page
&page=adminandstaff">Administration and Staff
&page=archives">Archives
&page=athletics">Athletics
&page=calendar">Calendar
&page=classroom_activities">Classroom Activities
&page=computerlab">Computer Lab
First Saturday 2001 - 2002
&page=library">Library
&page=lunch_menu">Lunch Menu
&page=pto">Parent Teacher Organization
">Photo Gallery

&page=special_programs">Special Programs

	Student of the month:	<%=school("studentofthemonth")%>
	Parent of the month:	<%=school("parentofthemonth")%>

<%=school("PTOschedule")%>

		School Colors
		">	">

Feedback | Africana Studies | First Saturday | Murchison Center | Cyber Schools

<% IF id >1 THEN id1= id-1 %> Previous School <% END IF%>

<% IF id < 10 THEN id1= id+1 %> Next School <% END IF%>

<% conn.close %>