%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim selectState
Dim selectState_numRows
Set selectState = Server.CreateObject("ADODB.Recordset")
selectState.ActiveConnection = MM_webdata_STRING
selectState.Source = "SELECT stateName, id FROM dbo.SSI_stateData WHERE display=1 ORDER BY stateName"
selectState.CursorType = 0
selectState.CursorLocation = 2
selectState.LockType = 1
selectState.Open()
selectState_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
selectState_numRows = selectState_numRows + Repeat1__numRows
%>
State Scholars Initiative: State Briefs
SITE MAP
STATE BRIEFS
STATE SITES