Mostrar x resultados de una tabla

[nene16803]

Hola, quiero mostrar solo los 50 ultimos resultados de una tabla de access, pero de la manera que lo estoy haciendo, aunque me los muestra, al llegar al 51 me da un error.
Os dejo el codigo que tengo, haber si algien me lo puede corregir.
Gracias por anticipado.

Código ASP:

<%
 
set oConn=server.createobject("ADODB.connection")
set rs=server.createobject("ADODB.Recordset")
oConn.open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mibase.mdb"))
 
rs.Open "SELECT * from mitabla ORDER BY val(cat) desc" ,oConn
r = 1 
do until rs.EOF
%>
  <form id="form1" name="form1" method="post" action="cambiar.asp">
              
               <td ><input name="municipio" type="text" id="municipio" value="<%=rs.Fields("municipio")%>"  size="20" /></td>
              </form>
              
                  <%
  
if r mod 50 = 0 then
rs.close
Set rs = Nothing
oConn.close
Set oConn = Nothing
 
end if
rs.MoveNext
r = r + 1
loop
 
%>
 

[Javier01]

Buenas tardes,
viendo por arriba, cuando llega a 50 haces:
rs.close
Set rs = Nothing
oConn.close
Set oConn = Nothing

y 2 lineas despues haces rs.MoveNext

[f4b14n]

mejor cambia tu consulta

Código SQL:

rs.OPEN "SELECT TOP 50 * from mitabla ORDER BY val(cat) desc" ,oConn
 

Saludos