%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsNews Dim rsNews_numRows Set rsNews = Server.CreateObject("ADODB.Recordset") rsNews.ActiveConnection = MM_connRumbalara_STRING rsNews.Source = "SELECT * FROM tblNewsletter ORDER BY newsID ASC" rsNews.CursorType = 0 rsNews.CursorLocation = 2 rsNews.LockType = 1 rsNews.Open() rsNews_numRows = 0 %>
|