Paginação

[paulojorge3l 0]

Pessoal to adapitando esse código de páginação que encontrei aqui no forun tá funcionando legalzinho o unico problema é o seguinte

 

quero que ele me mostre direto o total de página tipo se tem 10 pagina mostra o link para as 10 e no caso ele tá mostrando de 4 em 4 paginas tipo assim você tem que clicar na 1 depois na 2 depois na 3 e na 4 ai então você vai ver o link da pagina 5 6 e 7 deu pra entender .... bom segue o código espero que alguem possa me ajudar valew

 

 

<% registros = 1pagina = Request.QueryString("pagina")If pagina = "" Thenpagina = 1End IfSet rs = Server.Createobject("ADODB.RECORDSET")set rs.ActiveConnection = connrs.CursorType = 3rs.PageSize = registrosSQL = "SELECT * FROM fotos_evento WHERE idevento LIKE '"&Request.QueryString("evento")&"' ORDER BY id ASC"rs.Open sqlIf rs.EOF ThenResponse.Write "Nenhum registro encontrado"Elsers.AbsolutePage = paginaWhile Not rs.EOF AND x < rs.PageSize x = x + 1 %><a href="../evento/<%=Rs("pasta")%>/img/grd/<%=Rs("foto")%>.jpg" target="foto" > <img src="../evento/<%=Rs("pasta")%>/img/pqn/<%=Rs("foto")%>.jpg" alt="Foto Número: <%=Rs("foto")%> - Código: <%=Rs("id")%>"></a><%rs.MoveNextWend%></li></ul></div><div id="botoes"><ul><li><%anterior = pagina - 1proxima = pagina + 1ultima = rs.PageCountprimeira = 1ultm2 = FormatNumber(rs.PageCount - 1,0)If pagina > 1 AND pagina <> 2 ThenResponse.Write " <a href=paginado.asp?evento="&Request.QueryString("evento")&"&pagina="&anterior - 1&">"&anterior - 1&"</a> "End IfIf pagina > 1 ThenResponse.Write " <a href=paginado.asp?evento="&Request.QueryString("evento")&"&pagina="&anterior&">"&anterior&"</a> "End IfResponse.Write " "&pagina&" "If Not rs.EOF ThenResponse.Write " <a href=paginado.asp?evento="&Request.QueryString("evento")&"&pagina="&proxima&">"&proxima&"</a> "End Ifrs.CloseSet rs = NothingEnd If %>

[smith 0]

Olá

 

tenta fazer assim, eu não sei se funciona, mas espero ter ajudado

abração.

 

<%TotalPaginas=rs.PageCountfor x=1 to TotalPaginas if x=pagina then response.write("["&pagina&"]") else response.write("<a href=paginado.asp?evento="&Request.QueryString("evento")&"&pagina="&x&">"&x&"</a>") end ifnext

[paulojorge3l 0]

Ae Smith Valew mesmo funcionou direitinho. Valew mesmo. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif