%@LANGUAGE="VBSCRIPT"%> <% set rsConsejos = Server.CreateObject("ADODB.Recordset") rsConsejos.ActiveConnection = MM_connConsejos_STRING rsConsejos.Source = "SELECT Fecha, Vinculo FROM TablaConsejos ORDER BY Fecha DESC" rsConsejos.CursorType = 0 rsConsejos.CursorLocation = 2 rsConsejos.LockType = 3 rsConsejos.Open() rsConsejos_numRows = 0 %>