<%@LANGUAGE="VBSCRIPT"%> <% set rsNews = Server.CreateObject("ADODB.Recordset") rsNews.ActiveConnection = MM_News_STRING rsNews.Source = "SELECT TOP 6 * FROM News ORDER BY NewsID DESC" rsNews.CursorType = 0 rsNews.CursorLocation = 2 rsNews.LockType = 3 rsNews.Open() rsNews_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 rsNews_numRows = rsNews_numRows + Repeat1__numRows %> <% rsNews.Close() %>