Útil artículo que te enseñará a paginar los datos obtenidos de una base de datos, utilizando el lenguaje ASP. De esta manera podrás ordenar en varias páginas la información tomada de una base de datos, facilitando la navegación por dichas páginas.

1 . Estableciendo la conexión y el conjunto de registros
2 . Definiendo la paginación
3 . Mostrando las páginas
4 . Construir los hipervínculos para moverse entre las páginas
5 . Conclusión

Paginación entre registros

El siguiente artículo describe como realizar la paginación de un conjunto de registros. Se muestran las técnicas para :

  • Realizar la paginación en conjuntos de x registros
  • Construir la tabla con hipervínculos para navegar entre las páginas de resultados
  • Pasar los parámetros necesarios entre las distintas páginas

Es recomendable tener conocimientos básicos sobre acceso a base de datos desde asp y paso de parámetros entre páginas.

Estableciendo la conexión y el conjunto de registros

El primer paso, si Ud. ya está familiarizado con el acceso a datos, no presenta nada nuevo, creamos una conexión y definimos la cadena de consulta de la manera habitual. En este ejemplo utilizaremos una tabla llamada «Libros» de una Base de Datos «Editorial» a la que accedemos con el origen de datos «dsnedit».

Acceso a la base de datos

<%
‘—– conectar
Set conn = Server.CreateObject(«ADODB.Connection»)
conn.open «dsnedit»,,»ODBC;DATABASE=Editorial;UID=;PWD=;DSN=dsnedit»

‘—– definir cadena sql
sql = «SELECT * FROM libros»
%>

Definiendo la paginación

Ahora si vamos a dar los primeros pasos en la paginación. El proceso consiste básicamente en establecer las propiedades que determinarán la cantidad de registros a mostrar y la página actual.

Definimos una variable con la cantidad de registros por página

<%
cantidadregistros=5
%>

A continuación vamos a determinar que página hay que mostrar y asignamos ese valor a una variable. Aquí aparece el primer parámetro que debemos pasar entre páginas, «paginaactual». Más adelante veremos como se pasa este parámetro.

<%
if request.querystring(«paginaactual»)<>«» then
mostrarpagina=request.querystring(«paginaactual»)
else
mostrarpagina=1
end if
%>

… y es el momento de abrir el recordset

<%
set rs=Server.CreateObject(«ADODB.Recordset»)
rs.cachesize=60
rs.open sql, conn, 3, 3
%>

Ya estamos en condiciones de realizar la paginación,

<%
rs.pagesize=cantidadregistros
maxpagina=cint(rs.pagecount)
maxregistros=cint(rs.pagesize)
rs.absolutepage=mostrarpagina
contreg=0
%>

Veamos en detalle que hemos hecho. Hemos establecido la propiedad pagesize del objeto recordset en 5 («cantidadregistro»). Guardamos la cantidad de paginas y su tamaño en dos variables. Con absolutepage indicamos que página debe mostrarse. Por último inicializamos un contador que vamos a usar al mostrar los registros.

Mostrando las páginas

Llegó el momento de mostrar el resultado. En primer lugar vamos a determinar los valores «desde» y «hasta».

<%
if int(mostrarpagina)<>int(maxpagina) then ‘– Si no es la última página.
hasta=mostrarpagina*5
desde=hasta-4
else
hasta=rs.recordcount
desde=(maxpagina*5)-4
end if
%>

Si en lugar de cinco registros quiere mostrar diez, sólo cambie los «5» por «10» y los «4» por «9».

Mostramos los valores recién calculados…

<%
response.write «Resultados : »
response.write desde & » a » & hasta & » de » & rs.recordcount & » encontrados.»
%>

Y construimos el ciclo que muestra los registros,

<%
do while not rs.eof and contreg < maxregistros
response.write rs.fields(«campo») & «
«
rs.movenext
contreg=contreg+1
loop
%>

Observe que ademas de controlar la propiedad eof, como se hace habitualmente, debemos verificar la cantidad de registros mostrados.

Construir los hipervínculos para moverse entre las páginas

Para terminar, sólo resta construir la lista de páginas y opcionalmente los hipervínculos «Anterior» y «Siguiente». Al terminar debemos tener algo como,

[<>]

Los hipervínculos de esta lista llaman, obviamente, a la misma pagina en la que estamos trabajando, por lo que podemos referirnos a la misma con una variable (lo que facilita la reutilización del código)

La variable «cero» se la agregaremos a las páginas 1 a 9. Si hay mas páginas asignamos a «cero» una cadena vacía.

A continuación, armamos la lista de hipervínculos. En primer lugar, si no estamos en la primer página guardamos en una variable el link «Anterior». En segundo lugar, guardamos en la variable la lista de páginas con un ciclo For…Next. Finalmente, si no estamos en la última página agregamos a la variable el link «Siguiente».

Paginación

<%

cero=»0″
nombrescript=request.servervariables(«script_name»)
if int(mostrarpagina)<>1 then ‘–si no es la primer página mostrar botón atrás
ref=» ref=ref & «?buscar=» & Server.Urlencode(request.querystring(«buscar»))
ref=ref & «&paginaactual=» & contador

if int(contador)=int(mostrarpagina) then ‘– pone en negrita pagina actual
ref=ref & «‘>» & cero & contador & «
«
else
ref=ref & «‘>» & cero & contador & ««
end if

next

if int(mostrarpagina)<>int(maxpagina) then ‘– si no es la última página
‘ mostrar botón siguiente

ref=ref & » 

Este sitio web utiliza cookies para que usted tenga la mejor experiencia de usuario. Si continúa navegando está dando su consentimiento para la aceptación de las mencionadas cookies y la aceptación de nuestra política de cookies, pinche el enlace para mayor información.

ACEPTAR
Aviso de cookies