Olá amigos Wm, eu fiz minha primeira paginação... muito simples... Gostaria de saber como posso fazer um campo onde o usuário digita a página que ele quer visualizar e então aperte no botão IR.
Obrigado
Escrever A Página Na Paginação
Started By alessancost, 15/03/2006, 12:41
2 replies to this topic
#1
Posted 15/03/2006, 12:41
#2
Posted 15/03/2006, 13:05
To sem tempo para explicar, segue um exemplo bem simples, nele tem o que precisa:
abs
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Vendo Mensagem do site</title> </head> <body> <% '-------------------------------------------------------------------------- 'Aqui vem todos os dados da paginacao # '-------------------------------------------------------------------------- TamanhoDaPagina = 2 pagina = request.querystring("pagina") if pagina = "" then pagina = CInt("1") else pagina = CInt(request.querystring("pagina")) end if '-------------------------------------------------------------------------- vendo = "1" Set rs = Server.CreateObject("ADODB.RecordSet") DSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("banco.mdb") SQL = "SELECT * FROM mensagem WHERE ver = '"& vendo &"' ORDER BY id DESC" rs.Open SQL, DSN, 3, 3 TotaldePaginas = CInt(rs.RecordCount/TamanhoDaPagina) rs.PageSize= TamanhoDaPagina if not rs.EOF then rs.AbsolutePage = pagina for x = 1 to TamanhoDaPagina if rs.EOF then exit for%> <div align="center"> <center> <table border="0" width="500" cellspacing="1" cellpadding="0"> <tr> <td width="116" valign="middle" align="right"><b>Nome:</b></td> <td width="368" valign="top" align="left"><%=rs("nome")%></td> </tr> <tr> <td width="116" valign="middle" align="right"><b>E-mail:</b></td> <td width="368" valign="top" align="left"><%=rs("email")%></td> </tr> <%if rs("site") = "0" or rs("site") = "" or rs("site") = "http://" then else%> <tr> <td width="116" valign="middle" align="right"><b>Site:</b></td> <td width="368" valign="top" align="left"><a href="http://<%=rs("site")%>" target="_blank"><%=rs("site")%></a></td> </tr> <%end if%> <tr> <td width="116" valign="top" align="right"><b>Mensagem:</b></td> <td width="368" valign="top" align="left"><%=rs("msg")%></td> </tr> <tr> <td width="484" valign="top" align="right" colspan="2"> <table border="0" width="100%" cellspacing="1" cellpadding="0"> <tr> <td width="25%" align="right"><b>Data</b>:</td> <td width="25%" align="left"><%=rs("data")%></td> <td width="25%" align="right"><b>Hora:</b></td> <td width="25%" align="left"><%=rs("hora")%></td> </tr> <tr> <td width="100%" align="right" colspan="4"><hr></td> </tr> </table> </td> </tr> </table> </center> </div> <%rs.MoveNext Next 'end if do absolute page end if%> <br> <div align="center"> <center> <table border="0" width="500" cellspacing="1" cellpadding="0"> <tr> <td width="100" valign="middle" align="right"> <%if pagina <> 1 then response.write "<a href=""ver_livro.asp?pagina="& pagina - 1 &""">Página Anterior</a>" end if%> </td> <td width="300" align="center"> <div id="pagg0"> <%for y = 1 to TotaldePaginas if pagina <> y then response.write " <a href=""ver_livro.asp?pagina=" & y & """>" & y & "</a>" else response.write " "& y &" " end if next%></div> </td> <td width="100" valign="middle" align="left"> <%if pagina < TotaldePaginas then response.write "<a href=""ver_livro.asp?pagina="& pagina + 1 &""">Próxima Página</a>" end if%></td> </tr> </table> </center> </div> </body> </html>
abs
#3
Posted 15/03/2006, 13:09
Obrigado maktub
Vou estudar o código que você postou
----------------------------------
maktub, acho que você não entendeu o que estou querendo fazer. Eu não encontrei no seu código um campo onde o usuário escreveria a página que ele quer ir...
Eu já tenho uma paginação... o que quero fazer agora é criar um campo onde o usuário digita a página que ele que ir na paginação.
Grato
Use o Botão Editar para acrescentar mais informações no Post
Vou estudar o código que você postou
----------------------------------
maktub, acho que você não entendeu o que estou querendo fazer. Eu não encontrei no seu código um campo onde o usuário escreveria a página que ele quer ir...
Eu já tenho uma paginação... o que quero fazer agora é criar um campo onde o usuário digita a página que ele que ir na paginação.
Grato
Use o Botão Editar para acrescentar mais informações no Post
Edição feita por: Generation, 15/03/2006, 17:15.
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)