%@LANGUAGE="VBSCRIPT"%> <% Dim rs_not Dim rs_not_numRows Set rs_not = Server.CreateObject("ADODB.Recordset") rs_not.ActiveConnection = MM_cnx_STRING rs_not.Source = "SELECT * FROM noticias WHERE categoria= 'Links' ORDER BY Titulo asc" rs_not.CursorType = 0 rs_not.CursorLocation = 2 rs_not.LockType = 1 rs_not.Open() rs_not_numRows = 0 %>
LINKS <%do while not rs_not.eof%>
<%rs_not.movenext loop%> | ||||||||