%@LANGUAGE="VBSCRIPT"%> <% Dim RecNoticias Dim RecNoticias_numRows Set RecNoticias = Server.CreateObject("ADODB.Recordset") RecNoticias.ActiveConnection = MM_ConexCoral_STRING RecNoticias.Source = "SELECT * FROM Noticias ORDER BY FechaNoticia DESC" RecNoticias.CursorType = 0 RecNoticias.CursorLocation = 2 RecNoticias.LockType = 1 RecNoticias.Open() RecNoticias_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 3 Repeat1__index = 0 RecNoticias_numRows = RecNoticias_numRows + Repeat1__numRows %>