paginação

[marvi 0]

Ola pessoal, como fazer uma paginação de uma lista de coisas? E como fazer também na hora de imprimir sair a lista completa e nao só o conteudo de uma paginação só?Obrigado!Marcelo

[Mário Monteiro 179]

tem um exemplo de como voce quer? ficou confuso...

[marvi 0]

É mostra os numeros 1,2,3...e cada um ser uma pagina listando....

[CaBo GeL 0]

ai vai uma paginação pronta... troque as funções de acordo com a sua necessidade...

 

<%

TedkDados.MoveNext

Loop

 

Dim AnteriorCategorias, ProximoCategorias

AnteriorCategorias = PaginaAtualCategorias - 1

If AnteriorCategorias <= 0 Then

AnteriorCategorias = 1

End If

ProximoCategorias = PaginaAtualCategorias + 1

If ProximoCategorias > TedkDados.PageCount Then

ProximoCategorias = TedkDados.PageCount

End If

If nopag = 1 Then

Else

End If

 

If TedkDados.Bof And TedkDados.Eof Then

Response.Write("<tr><td height=25 colspan=2><div align=center class=FonteNegrito style='color:#FF0000'>Tabela vazia</div></td></tr>")

On Error Resume Next

End If

%>

<tr>

<td height="25" colspan="3"><table width="49" height="49" align="center">

<tr>

<td width="17" height="21">

<% If PaginaAtualCategorias <> AnteriorCategorias Then %>

<a href="Cadastro.asp?p=<%=AnteriorCategorias%>&VerCategorias=<%=VerCategorias%>&Tabela=Categorias&Windows=Categorias"><img src="Imagens/Seta1_2.gif" alt="Voltar" width="17" height="18" border="0" /></a>

<% Else %>

<img src="Imagens/Seta1.gif" width="17" height="18" />

<% End If %></td>

<td width="115" height="21"> </td>

<td width="18" height="21">

<% If PaginaAtualCategorias <> ProximoCategorias Then %>

<a href="Cadastro.asp?p=<%=ProximoCategorias%>&VerCategorias=<%=VerCategorias%>&Tabela=Categorias&Windows=Categorias"><img src="Imagens/Seta2_2.gif" alt="Avançar" width="17" height="18" border="0" /></a>

<% Else %>

<img src="Imagens/Seta2.gif" width="17" height="18" />

<% End If %></td></tr></table>

<% End If %>

 

 

Espero q isso te ajude... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif