AVISO: Para garantizar el buen funcionamiento de esta iniciativa de ABC, tu comentario puede tardar un poco en verse reflejado en el listado de respuestas pues será validado manualmente. Te agradecemos la espera y te pedimos disculpas. Lo hacemos para que tu opinión se muestre correctamente y con toda la seriedad que requiere por las molestias que te has tomado al escribirlo. Muchas gracias por colaborar con nosotros y por tu paciencia. Queremos hacer contigo el mejor ABC.es.

<% On error resume next TamPagina=10 'numero de resultados por pagina numpag=10 'numero de enlaces de paginas gets="" 'si tiene algun parametro por get extra como en un buscador clase="" 'la clase si es que tiene cada enlace del paginado SQL=" SELECT * from "&tabla&" where validado='1' ORDER BY id DESC; " 'la consulta mensaje="Aún no hemos recibido ningun mensaje." 'Esta es una frase en caso que no haya ningun resultado %> <% totalComment = prs.RecordCount numInicio = totalComment - ( (cint(PaginaActual)-1) * TamPagina ) do while not prs.EOF and CuantosRegistros < TamPagina %> <% CuantosRegistros=CuantosRegistros+1 numInicio=numInicio-1 prs.MoveNext Loop %>