<%@ Language=VBScript %> <% Response.Buffer = 1 %> <% subHeader() If Request("bolAddNew") = 1 Then subAddNew() subResults() ElseIf Request("bolShowResults") = 1 Then subResults() Else subForm 0 End If subFooter() Response.Flush() Response.End() %> <% Sub subAddNew Dim intErrorFound intFieldCount = 0 intErrorFound = 0 For Each x In Request.Form intFieldCount = intFieldCount + 1 If Mid(x, 1, 3) = "int" Then For Each y In Request.Form If Mid(x, 4, 3) = Mid(y, 4, 3) AND Not x = y Then If Request.Form(x) = Request.Form(y) OR Not Request.Form(x) > 0 Then intErrorFound = 1 End If End If Next End If Next If intFieldCount < 26 Then intErrorFound = 1 End If If intErrorFound = 1 Then subForm 1 subFooter() Response.Flush() Response.End() End If Dim objDBWeb, objRSWeb Dim strSQL strSQL = "SELECT * FROM Blueprint_Survey" Set objDBWeb = Server.CreateObject("ADODB.Connection") objDBWeb.Open "DSN=webmysql;Database=web2061;" Set objRSWeb = Server.CreateObject("ADODB.Recordset") objRSWeb.ActiveConnection = objDBWeb objRSWeb.Source = strSQL objRSWeb.CursorLocation = adUseClient objRSWeb.CursorType = adOpenStatic objRSWeb.LockType = adLockOptimistic objRSWeb.Open() objRSWeb.AddNew() objRSWeb("TodaysDate") = Now() For Each x In Request.Form txtVarType = Mid(x, 1, 3) txtVarName = Mid(x, 4, Len(x)) If txtVarType = "txt" Then objRSWeb(txtVarName) = Request.Form(x) ElseIf txtVarType = "int" Then objRSWeb(txtVarName) = Request.Form(x) End If Next objRSWeb.Update() objRSWeb.Close() Set objRSWeb = Nothing objDBWeb.Close() Set objDBWeb = Nothing %>
Thank you for filling out the Blueprints Survey. Results of the survey are below.
 

 

<% End Sub %> <% Sub subResults Dim objDBWeb, objRSWeb Dim strSQL Dim intRecordCount strSQL1 = "SELECT Count(RecordNumber) AS RecordCount FROM Blueprint_Survey;" strSQL2 = "SELECT SUM(FdnEquity) AS FdnEquity, SUM(FdnPolicy) AS FdnPolicy, SUM(FdnFinance) AS FdnFinance, " & _ "SUM(FdnResearch) AS FdnResearch, SUM(SchOrganization) AS SchOrganization, SUM(SchCurriculum) AS SchCurriculum, " & _ "SUM(SchMaterials) AS SchMaterials, SUM(SchAssessment) AS SchAssessment, SUM(SupTeacher) AS SupTeacher, " & _ "SUM(SupHigher) AS SupHigher, SUM(SupFamily) AS SupFamily, SUM(SupBusiness) AS SupBusiness, " & _ "SUM(IssCurriculum) AS IssCurriculum, SUM(IssAssessment) AS IssAssessment, SUM(IssTextbook) AS IssTextbook, " & _ "SUM(IssFunding) AS IssFunding, SUM(IssTIMMS) AS IssTIMMS, SUM(IssTeacherPrep) AS IssTeacherPrep, " & _ "SUM(IssParent) AS IssParent " & _ "FROM Blueprint_Survey;" Set objDBWeb = Server.CreateObject("ADODB.Connection") objDBWeb.Open "DSN=webmysql;Database=web2061;" Set objRSWeb = Server.CreateObject("ADODB.Recordset") objRSWeb.ActiveConnection = objDBWeb objRSWeb.Source = strSQL1 objRSWeb.CursorLocation = adUseClient objRSWeb.CursorType = adOpenStatic objRSWeb.LockType = adLockReadOnly objRSWeb.Open() intRecordCount = CInt(objRSWeb("RecordCount")) objRSWeb.Close() objRSWeb.Source = strSQL2 objRSWeb.Open() %>

Average Rankings within Each Category

1. Rankings of the four Foundation areas from 1 (highest) to 4 (lowest) according to their impact on the current and future success of reform:

Equity<%= Round(CInt(objRSWeb("FdnEquity"))/intRecordCount, 2) %>
Policy<%= Round(CInt(objRSWeb("FdnPolicy"))/intRecordCount, 2) %>
Finance
(funding for schools)
<%= Round(CInt(objRSWeb("FdnFinance"))/intRecordCount, 2) %>
Research
(how students learn; instructional practices)
<%= Round(CInt(objRSWeb("FdnResearch"))/intRecordCount, 2) %>

2. Rankings of the four School Context areas from 1 (highest) to 4 (lowest) according to their impact on the current and future success of reform:

School Organization
(governance, class size, schedules)
<%= Round(CInt(objRSWeb("SchOrganization"))/intRecordCount, 2) %>
Curriculum Connections
(among and between disciplines)
<%= Round(CInt(objRSWeb("SchCurriculum"))/intRecordCount, 2) %>
Materials and Technology
(textbooks, computers, media)
<%= Round(CInt(objRSWeb("SchMaterials"))/intRecordCount, 2) %>
Assessment
(national, state, local, classroom)
<%= Round(CInt(objRSWeb("SchAssessment"))/intRecordCount, 2) %>

3. Rankings of the four Support Structure areas from 1 (highest) to 4 (lowest) according to their impact on the current and future success of reform:

Teacher Education<%= Round(CInt(objRSWeb("SupTeacher"))/intRecordCount, 2) %>
Higher Education<%= Round(CInt(objRSWeb("SupHigher"))/intRecordCount, 2) %>
Family and Community<%= Round(CInt(objRSWeb("SupFamily"))/intRecordCount, 2) %>
Business and Industry<%= Round(CInt(objRSWeb("SupBusiness"))/intRecordCount, 2) %>

4. Rankings of the following issues according to their impact (positive or negative) on an institution's science and mathematics education reform efforts, from 1 (greatest impact) to 7 (least impact):

State curriculum standards<%= Round(CInt(objRSWeb("IssCurriculum"))/intRecordCount, 2) %>
State assessment<%= Round(CInt(objRSWeb("IssAssessment"))/intRecordCount, 2) %>
Textbook quality or availability<%= Round(CInt(objRSWeb("IssTextbook"))/intRecordCount, 2) %>
School funding or finances<%= Round(CInt(objRSWeb("IssFunding"))/intRecordCount, 2) %>
International test results (TIMSS)<%= Round(CInt(objRSWeb("IssTIMMS"))/intRecordCount, 2) %>
Teacher preparation or quality<%= Round(CInt(objRSWeb("IssTeacherPrep"))/intRecordCount, 2) %>
Parent or family support<%= Round(CInt(objRSWeb("IssParent"))/intRecordCount, 2) %>
<% objRSWeb.Close() Set objRSWeb = Nothing objDBWeb.Close() Set objDBWeb = Nothing End Sub %> <% Sub subForm (intError) %> <% If intError = 1 Then %> <% End If %>

Welcome to the Blueprints Online Survey. The goal of this site is to stimulate further discussion of important education reform issues raised in Project 2061's Blueprints for Reform: Science, Mathematics, and Technology Education.

The results of the survey reflect the up-to-date rankings provided by all repondents. In addition to choosing a response, you may comment in writing.

To take part, complete the survey by responding to the questions. As background, you may want to read selected chapters in Blueprints for Reform (available in print from Oxford University Press or online). The survey will take you less than 5 minutes to finish. 

 
Please be sure to provide rankings in all four categories and give each item a unique ranking within its category.
 

Blueprints Online Survey

Blueprints for Reform examines 12 crucial areas of the education system that must work together and change to bring about needed reforms in science and mathematics education. These 12 areas are grouped in the following categories: The Foundation; The School Context; and The Support Structure. This survey will help us determine the most crucial areas to focus on. Future surveys will explore these top priority areas.

 
1. Rank the four Foundation areas from 1 (highest) to 4 (lowest) according to their impact on the current and future success of reform:
   1234
    value="1"> value="2"> value="3"> value="4">   Equity
    value="1"> value="2"> value="3"> value="4">   Policy
    value="1"> value="2"> value="3"> value="4">   Finance (funding for schools)
    value="1"> value="2"> value="3"> value="4">   Research (how students learn; instructional practices)
Comments:
 
2. Rank the four School Context areas from 1 (highest) to 4 (lowest) according to their impact on the current and future success of reform:
   1234
    value="1"> value="2"> value="3"> value="4">   School Organization (governance, class size, schedules)
    value="1"> value="2"> value="3"> value="4">   Curriculum Connections (among and between disciplines)
    value="1"> value="2"> value="3"> value="4">   Materials and Technology (textbooks, computers, media)
    value="1"> value="2"> value="3"> value="4">   Assessment (national, state, local, classroom)
Comments:
 
3. Rank the four Support Structure areas from 1 (highest) to 4 (lowest) according to their impact on the current and future success of reform:
   1234
    value="1"> value="2"> value="3"> value="4">   Teacher Education
    value="1"> value="2"> value="3"> value="4">   Higher Education
    value="1"> value="2"> value="3"> value="4">   Family and Community
    value="1"> value="2"> value="3"> value="4">   Business and Industry
Comments:
 
4. Rank the following issues according to their impact (positive or negative) on you or your institution's science and mathematics education reform efforts, from 1 (greatest impact) to 7 (least impact).
   1234567
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   State curriculum standards
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   State assessment
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   Textbook quality or availability
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   School funding or finances
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   International test results (TIMSS)
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   Teacher preparation or quality
    value="1"> value="2"> value="3"> value="4"> value="5"> value="6"> value="7">   Parent or family support
Comments:
 
Optional

Name: ">
E-mail: ">

Thank you for taking the time to complete this survey. Select "Submit Survey" now to send your responses to us.

<% End Sub %> <% Sub subHeader %> Project 2061: Blueprints Online: Survey

Blueprints Navigation

You are currently in  

 
      
<% End Sub %> <% Sub subFooter %>

 

<% End Sub %>