Olá, pessoal, tenho o menu de um album de fotos, que exibe em 2 colunas as imagens em miniaturas,
antes de eu adaptar para se exibido em 2 colunas a paginação funcionava beleza, mas depois que
passei para ser exibido em colunas a paginação parou de funcionar, gostaria que me ajudassem com esse problema
a baixo o codigo que estou utilizando.
<%
Dim objRs, x, intpage, strquantidade
intpage = request.QueryString("txtpage")
Set objRS = Server.CreateObject("Adodb.recordset")
call Abreconexao
strquantidade = request.querystring("quantia")
session("quantia") = "9"
if session("quantia") = "" then
objrs.pagesize = 10
else
objrs.pagesize = session("quantia")
end if
objRs.open "Select * From fotos order by id" , Objconn, 3, 3
if intpage = "" then
intpage = 1
end if
objrs.absolutepage = cint(intpage)
x = 1
%>
<%
intrec=0
col = 2
response.write "<table>"
do while NOT objRs.EOF and x <= objrs.pagesize
conta = intrec mod col
if conta = 0 Then
response.write "<tr><td>"
else
response.write "<td>"
end if
response.write "<img width='75' height='56' border='2' class='bord' src=fotos2/"& ObjRs("foto") & ">"
if conta = (col - 1) then
response.Write "</td></tr>"
else
response.write "</td></table>"
end if
ObjRs.MoveNext
intrec=intrec+1
Loop
%>
<br>
<div align="center">
<div align="center" class="style2">
<%if cint(intpage) > 1 then 'se for maior que a pagina 1 ira aparecer
%>
<a href="menu1.asp?txtpage=<%=intpage-1%>&quantia=<%=strquantidade%>">Voltar </a> |
<%end if%>
<%if cint(intpage) < objrs.pagecount then 'quantidade de paginas
%>
<a href="menu1.asp?txtpage=<%=intpage+1%>&quantia=<%=strquantidade%>">Avançar</a>
<%end if%>
<%
objrs.close
set ObjRs= Nothing
call fechaconexao
%>
Pergunta
ANDRE_GUSTAVO
Olá, pessoal, tenho o menu de um album de fotos, que exibe em 2 colunas as imagens em miniaturas,
antes de eu adaptar para se exibido em 2 colunas a paginação funcionava beleza, mas depois que
passei para ser exibido em colunas a paginação parou de funcionar, gostaria que me ajudassem com esse problema
a baixo o codigo que estou utilizando.
Gostaria que fossem exibido 2 colunas e 9 linhas
Desde já agradeço a ajuda de todos.
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.