02/08/2004, 08:08
| ||||
| ||||
| Paginar en ASP Alguien sabe como puedo paginar los registros q muestro en mi página??? Lo q sucede es q muestro una lista de registros al momento de accesar a la página, pero esta lista es muy larga y quisiera saber como puedo hacer para paginar dichos registros. De antemano gracias...
__________________ De antemano... Gracias. |
|
02/08/2004, 08:59
| |||
| |||
| hay una propiedad del recordset, no recuerdo cual, que te permite elegir cuales registros mostrar con .PageSize definis la cantidad de registros a mostrar ahora busco la otra propiedad |
|
02/08/2004, 09:38
| ||||
| ||||
| podrias postearme algun ejemplo?? la verdad es q casi no le entiendo a esto de la paginada (creo q estoy en esos días en los q la sinapsis del cerebro no labora)
__________________ De antemano... Gracias. |
|
02/08/2004, 09:47
| |||
| |||
| set rscnPF = Server.CreateObject("ADODB.Recordset") txtSqlstring = "select * from usuarios" rscnPF.Open txtSqlstring, cnPF,1 rscnPF.PageSize = 30 rscnPF.AbsolutePage = Request.QueryString("PaginaActual") Te devolverá los primeros 30 si en PaginaActual = 1 los segundos 30 registros si es 2 y asi sucesivamente... |
|
02/08/2004, 12:55
| ||||
| ||||
| Pero en q parte voy a declarar "pagina actual"?? La base de datos a donde hago la conexión es oracle. Varia en algo esto????
__________________ De antemano... Gracias. |
|
02/08/2004, 13:02
| ||||
| ||||
| PageSize es un metodo del RecordSet no tiene relación directa con la base de datos. Ahora, "PaginaActual" debe ser la variable con la que controlas la marca de inicio de extracción de registros. Se supone que debes de controlarla con botones de Anterior y Siguiente (donde sumas o restas el valor que tienes en PageSize) o mediante hipervínculos con todos los números de paginas que obtienes del total de registros entre el valor de paginación. Tanto los botones, como los hipervínculos deben ir direccionados a la misma página, por eso el request a esa variable. Saludos |
|
02/08/2004, 13:09
| ||||
| ||||
| Es algo así: 'Cuento las páginas PaginasTotales=AdsRS.PageCount 'Compruebo que la pagina actual está en el rango if PaginaActual < 1 then PaginaActual = 1 end if if PaginaActual > PaginasTotales then PaginaActual = PaginasTotales end if ???? Mi problema, es q no se donde poner cada cosa.
__________________ De antemano... Gracias. |
|
02/08/2004, 13:55
| |||
| |||
| PaginaActual debe ser un parametro de la pagina despues para no salirte del rango de paginas, haces lo que vos pusiste ultimo pero antes que nada tenes que saber que cuando haces click en "Proxima Pagina" estas redireccionando a la misma pagina pero con el parametro PaginaActual incrementado en 1 se entiende? a partir de eso tomas con el Request.QueryString y lo cargas en la variable... |
|
24/07/2007, 10:45
| |||
| |||
| Re: Paginar en ASP Que tal soy nuevo dentro del foro pero aquí tengo un código de paginación acerca de lo que quieres hacer mira te lo muestro a continuación está hecho en asp, esta página se llama paginar.asp y como te darás cuenta al final se llama a si misma porque como mencionó forvan se incrementa en uno <!-- #Include FIle="conn.asp" --> este es un archivo donde guardo la conexion <html> <head> <title>Repaginador de resultados</title> </head> <%set rs = Server.CreateObject("ADODB.RecordSet") set rs2 = Server.CreateObject("ADODB.RecordSet") conectarBD 'constantes ADO VBScript Const adCmdText = &H0001 Const adOpenStatic = 3%> <% sql="select algo" rs.open sql, conn, adCmdText, adOpenStatic 'actualizamos numero de pagina If Request.QueryString("pag")<>"" Then Session("pagina")=Request.QueryString("pag") Else Session("pagina")=1 End If 'resultados por pagina a elegir arbitrariamente yo puse uno para iniciar num_registros = 1 'Dimensionamos las paginas y determinamos la pagina actual rs.PageSize=num_registros rs.AbsolutePage=Session("pagina") %> <body> <table cellspacing="2" cellpadding="2" border="1" align="center"> <% 'Contamos el numero de campos num_campos=rs.Fields.Count For campo=0 to num_campos-1%> <td align="center"><%=rs(campo).Name%></td> <% Next registros_mostrados = 0 While (Not rs.eof And registros_mostrados < num_registros) registros_mostrados = registros_mostrados +1 %> <tr> <%For campo=0 to num_campos-1 %> <td align="center"><%=rs(campo)%></td> <%Next%> </tr> <% rs.MoveNext Wend %> <tr> <td colspan="<%=num_campos%>" align="center"> <% i=0 While i<rs.PageCount i=i+1 %> <b><a href="paginar.asp?pag=<%=i%>"><%=i%></a></b> <% Wend %> </td> </tr> </table> <div align="center"> Número de página actual: <b><%=Session("pagina")%></b> <br> Número de páginas total: <b><%=rs.PageCount%></b> <br> Número de registros por página: <b><%=rs.PageSize%></b> <br> Número de registros seleccionados: <b><%=rs.RecordCount%></b> </div> <br><br> <% RS.Close Conn.Close %> </body> </html> |
, aunque dudo que a Itankai le sirva de mucho dado que este post estaba muerto desde el 2004 
