<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rsNews
Dim rsNews_numRows
Set rsNews = Server.CreateObject("ADODB.Recordset")
rsNews.ActiveConnection = MM_conn_STRING
rsNews.Source = "SELECT * FROM tblNews ORDER BY nDtmDatePosted DESC"
rsNews.CursorType = 0
rsNews.CursorLocation = 2
rsNews.LockType = 1
rsNews.Open()
rsNews_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 10
Repeat1__index = 0
rsNews_numRows = rsNews_numRows + Repeat1__numRows
%>
Welcome to Reach Records
