Navegando (<= Anterior | Próximo =>)

[creipi 0]

Gostaria de saber qual a rotina usada para incluir um sistema de avançar e voltar, em um sistema de fotos por exemplo. Obs: Com banco de dados. Francisco Gerson

[rOcKLoCo 0]

cara, é usado PAGINAÇÃO para isso... dá uma procurada no forum.. pois tem vários topicos falando sobre!!falows

[creipi 0]

Realmente tem vários exemplos, mas ainda preciso de ajuda, o que eu quero é bastante simples, é isso:FOTO<= Anterior | Próximo =>Me ajudem, por favor

[tr374 0]

por mais simples que pareça, você precisa usar paginação, ter uma lista dos arquivos e tal... Começa ai que ajudamos.

[Mário Monteiro 179]

por mais simples que pareça, você precisa usar paginação, ter uma lista dos arquivos e tal... Começa ai que ajudamos.

relamente será paginação, a unica peculiaridade será que o tamnho da pagina será 1

[Reinaldo 0]

Espero que esse sitema de paginação ajude.

=================================================

Set Conn = Server.CreateObject("Adodb.Connection")

Conn.ConnectionString = "DBQ=" & Server.MapPath("nome do seu banco.mdb") & ";"

Conn.ConnectionString = Conn.ConnectionString & "Driver={Microsoft Access Driver (*.mdb)};"

Conn.Open

 

'objeto recordset

Set RS = Server.CreateObject("Adodb.RecordSet")

 

 

RS.PageSize = 5

sql = "SELECT * FROM coloque o nome da sua tabela aqui"

RS.Open sql, Conn,3,3

 

If RS.EOF then

Response.Write "Nenhum registro encontrado!"

Response.End

Else

If Request.QueryString("pagina")="" then

intpagina=1

Else

If Cint(Request.QueryString("pagina"))<1 then

intpagina=1

Else

If Cint(Request.QueryString("pagina"))>RS.PageCount then

intpagina=RS.PageCount

Else

intpagina=Request.QueryString("pagina")

End If

End if

End if

End if

 

RS.AbsolutePage=intpagina

intrec=0

%>

 

p align="center"><b>

Pagina <%=intpagina%> de <%=RS.PageCount%>

</b>

<div align="center">

<center>

<table border="0" width="75%">

 

<%While intrec<RS.PageSize and not RS.EOF%>

<tr>

<td width="18%"><%=RS("marca")%></td>

<td width="25%"><%=RS("moto")%></td>

<td width="17%"><%=RS("ano")%></td>

<td width="20%"><%=RS("cor")%></td>

<td width="20%"><%=FormatCurrency(RS("preco"))%></td>

</tr>

 

<%

RS.MoveNext

intrec=intrec+1

Wend%>

</table>

</center>

</div>

<p align="center">

 

If intpagina>1 then %>

<a href="paginacao.asp?pagina=<%=intpagina-1%>">Anterior</a>

<%end if

 

For i=1 to RS.PageCount

If i = Cint(intpagina) then%>

[<%=i%>]

<% else %>

<a href="paginacao.asp?pagina=<%=i%>">[<%=i%>]</a>

<%end if

Next

 

If strcomp(intpagina,RS.PageCount)<>0 then %>

<a href="paginacao.asp?pagina=<%=intpagina+1%>">Próxima</a>

<%end if%>

[humberto1001 0]

Amigo, pra te falar a verdade, naum entendo nada de programação em ASP , mas sem brincar com o Dreamweaver, se você usa o dreamweaver, vai ficar muito facil, veja:1º Inicie o Dreamweaver ( oooooooooo)2º Crie um nova pagina em ASP3º Window>Server behaviors4º Agora digite na pagina : Anterior Proximo5º Selecione a palavra anterior e clique no sinal de mas na janela do Server behaviors, vá em: Recordser paging/ move to previous record6º Faço o mesmo com a palavra proximo, selecione e vá em move to next record.Espero ter ajudado, caso pinte alguma dúvida, :blink: humberto1001@terra.com.br