<%@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

State Scholars InitiativeSITE MAP

HOME

About SSI

Research

News and Media

STATES»

STATE BRIEFS

STATE SITES

<% selectState.Close() Set selectState = Nothing %>