Modificar la paginación

surenet · #1 (**permalink**) 31/05/2006, 03:47

Hola a todos,

Necesito cambiar la paginación de una tienda y no me sale.
Actualmente me recoge 10 registros por página y numera las páginas de la forma Página: 1 2 3 4 5 ...

Lo que quiero hacer es cambiar la forma en que numera las página. En vez de Página: 1 2 3 .. quiero que ponga los típicos:
<< Anterior Siguiente >>

El código es el siguiente:

<%
end if
rs.movenext
wend

if contador > 0 then
sql = "select contador(id) as totalproductos from productos where categoria = " & r & sqlagrega
set rs = db.Execute(sql)
totalproductos = int(rs("totalproductos"))
%>

Página: <%for t = 0 to fix((totalproductos-1)/10)%> <a href="tienda.asp?s=<%=t%>&r=<%=r%>"><%if t=(s/10) then%><b><%end if%><%=t+1%><%if t=(s/10) then%></b><%end if%></a>
<%
next
else
%>

...

Os agradeceré mucho cualquier ayuda.

Un saludo

gorka_arai · #2 (**permalink**) 31/05/2006, 04:33

Aupa koleguita!!
Esto te servirá:

Código:

If pagina_actual > 1 Then
%>
</FONT></FONT>
<A href="Paginar_lineas_pedidos.asp?eje=30&amp;page=<%= pagina_actual - 1 %>" ><FONT 
face=Arial>[&lt;&lt; Anterior]</FONT> </a>
<%
End If

' mostramos la paginacion por numeros de página
For I = 1 To cant_paginas
If I = pagina_actual Then
%>
<%= I %>
<%
Else
%>
<FONT face=Arial> </FONT>
<A href="Paginar_lineas_pedidos.asp?eje=30&amp;page=<%= I %>" ><%= I %></a>
<%
End If
Next 'I
If pagina_actual < cant_paginas Then
%>
<A href="Paginar_lineas_pedidos.asp?eje=30&amp;page=<%= pagina_actual + 1 %>" ><FONT 
face=Arial>[Próximo &gt;&gt;]</FONT ></a>
<%
End If
'Fin...
%>

Fíjate en las líneas que te he marcado en negrita que doy a la propiedad "page" de la etiqueta "A" el valor de la página+1 o el valor de la página-1 dependiendo de si es "Anterior" o "Siguiente". Es muy fácil!!!

Aupa. Agur

surenet · #3 (**permalink**) 31/05/2006, 04:49

Gracias por contestar Gorka

Hay una parte que no se como hacer
Donde tu pones:
<A href="Paginar_lineas_pedidos.asp?eje=30&page=<%= pagina_actual - 1 %>" >

En mi código es:
<a href="tienda.asp?s=<%=t%>&r=<%=r%>">

El r=<%=r%> es la categoría a la que pertenece el producto

¿Cómo hago para añadir la indicación de la página page=<%= pagina_actual - 1 %> y la de la categoría r=<%=r%>?

Un saludo

3pies · #4 (**permalink**) 31/05/2006, 07:25

Surenet, en las FAQ tienes el sistema de paginación más habitual (al menos entre los que usamos este foro). Tú parece que estás utilizando otro distinto. Si le echas un vistazo al de las FAQ, podrás solucionar tu problema, simplemente eliminado unas cuantas líneas de código (las que afectan al contador de páginas sueltas).

Salu2

JuanRAPerez · #5 (**permalink**) 31/05/2006, 10:12

hey no modifique eso

modifica la variable

mostrar = 10

esta mas arriba ent u codigo, sin temor a equivocarme yo uso la misma paginacion
el codigo es mas o menos asi

Dim mostrar 'cantidad de registros a mostrar por página
Dim cant_paginas 'cantidad de páginas que recibimos
Dim pagina_actual 'La página que mostramos
Dim registro_mostrado 'Contador utilizado para mostrar las páginas
Dim I 'Variable Loop

mostrar = 20 ' Pueden modificar este número para cambiar la cantidad de registros por página

JuanRAPerez · #6 (**permalink**) 31/05/2006, 10:13

perdon la regue tenes razon no te referis a cuantos por pagina si no al formato de ver el avanzar :P

no lei a tiempo jajajaj

hay lo borran

surenet · #7 (**permalink**) 31/05/2006, 10:38

He conseguido que me funcione (a medias) asi:

Código:

<a href="tienda.asp?s=<%=s - 1%>&amp;r=<%=r%>"> Anterior</a>&nbsp;&nbsp;
<%
If s < 0 Then
			s = 0
		 ElseIf s > totalproductos Then
			s = totalproductos
%>&nbsp;&nbsp;

<% end if %>
<% if s < totalproductos then %>&nbsp;&nbsp;
<a href="tienda.asp?s=<%=s + 1%>&amp;r=<%=r%>"> siguiente </a> 
<% end if %>

Digo "a medias" porque las páginas avanzan y retroceden bien pero no consigo que hagan tope, es decir, cuando llega la última página sigue apareciendo el siguiente y me lleva a una página sin registros. Lo mismo ocurre con el anterior que aparece desde el inicio, y si le doy de inicio a anterior me lleva a una página sin registros ( la -1 )

Lo ideal sería que en un principio no apareciera anterior y al llegar a la última página desapareciera el siguiente

Alguna sujerencia?

JuanRAPerez · #8 (**permalink**) 31/05/2006, 11:15

la idea basica tendria que ser

Cita:

If pagina_actual > 1 Then
'mostramos enlace anterior
End If

If pagina_actual < cant_paginas Then
'mostramos enlace a proximos
End If

surenet · #9 (**permalink**) 31/05/2006, 12:29

Si, por ahí anda la cosa y casi lo tengo. He conseguido que desaparezca el anterior al principio, y avanza y retrocede bien.

Lo he conseguido con la idea original que has dado:

Código:

<% 
If s > 0 Then
%>
<a href="tienda.asp?s=<%=s - 1%>&amp;r=<%=r%>"> Anterior</a>&nbsp;&nbsp;
<% end if %>
<%
If s < totalproductos then
%>
<a href="tienda.asp?s=<%=s + 1%>&amp;r=<%=r%>"> siguiente </a> 
<% end if %>

Donde s= pagina_actual y totalproductos=cant_paginas (solo muestra 1 producto por página)

Pero necesito que al llegar a la última página no deje avanzar más, pero no lo consigo. He probado esto:

Código:

<% 
If s > 0 Then
%>
<a href="tienda.asp?s=<%=s - 1%>&amp;r=<%=r%>"> Anterior</a>&nbsp;&nbsp;
<% end if %>
<%
If s > totalproductos Then
   s = totalproductos	
   ElseIf s < totalproductos then
			
%>
<a href="tienda.asp?s=<%=s + 1%>&amp;r=<%=r%>"> siguiente </a> 
<% end if %>

Pero el resultado es el mismo, en la última página permite pinchar en siguiente y lleva a una página que no tiene nada.

Se te ocurre algo?

JuanRAPerez · #10 (**permalink**) 31/05/2006, 13:32

sera

Cita:

pagina_actual = s
cant_paginas = totalproductos

If pagina_actual > 1 Then
<a href="tienda.asp?s=<%=s - 1%>&r=<%=r%>"> Anterior</a>
End If

If pagina_actual < cant_paginas Then
<a href="tienda.asp?s=<%=s + 1%>&r=<%=r%>"> siguiente </a>
End If

surenet · #11 (**permalink**) 31/05/2006, 13:38

En mi caso la primera página es la 0, no la 1

JuanRAPerez · #12 (**permalink**) 31/05/2006, 13:40

igual lo acomodas

y al llegar al final te sigue imprimiendo siguiente????

surenet · #13 (**permalink**) 31/05/2006, 13:45

Si, llego a la última página y permite seguir y llegar a una página que no tiene nada, y en esta si desaparece el siguiente y solo queda el anterior

JuanRAPerez · #14 (**permalink**) 31/05/2006, 14:27

jajaja suena raro

Cita:

If pagina_actual < cant_paginas Then
<a href="tienda.asp?s=<%=s + 1%>&r=<%=r%>"> siguiente </a>
End If

seria algo asi

Cita:

casi_ultima = cant_paginas - 1
If pagina_actual < casi_ultima Then
<a href="tienda.asp?s=<%=s + 1%>&r=<%=r%>"> siguiente </a>
End If

surenet · #15 (**permalink**) 01/06/2006, 00:28

SOLUCIONADO!!

Muchas gracias por tu ayuda JuanRA

JuanRAPerez · #16 (**permalink**) 01/06/2006, 09:29

a la orden

suerte