Paginación ADO
Documento de: Xavier Bernadí i Millan
Página web: http://www.xlwebmasters.com
Con este código conseguimos hacer una páginación
de un listado de una tabla de forma muy fácil.
Lo que hacemos es abrir un recordset y cortarlo en diferentes páginas:
'Pagina el resultado de 5 en 5. Pregunta.PageSize = 5
Después se le dice en que página queremos empezar a listar en este momento:
'Listaria la página 3
Pregunta.AbsolutePage = 3
Una vez hecho el listado solo hace falta hacer los controles de página adelante y atras que son un simple link indicando la página a la que queremos ir.