Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

www

Paginacao , Colunas e Fotos

Recommended Posts

Galera imaginem que tenho uma tabela com 48 fotos...Preciso exibir numa pagina.asp 16 fotos por pagina divididas em 4 linhas de 4 colunas cada ou seja a foto 1 na coluna 1 da linha 1 ,a foto 2 na linha 1 coluna 2 , a foto 3 na linha 1 coluna 3 , a foto 4 na linha 1 coluna 4 , a FOTO 5 na linha 2 coluna 1...e assim por diante entendeu ?Preciso criar um recordset pra exibir os registros dividindo em 4 linhas / 4 colunas completando as colunas na ordem especificada e preciso que exiba no max 16 registros por pagina...Ja tentei quebrar minha cabeça aqui mais ano consegui , e na paginacao preciso que apareça apenas próxima e anterior e só, alguém pode me ajudar? é super urgente mesmo galera...Valeu mto obrigado e até ....

Compartilhar este post


Link para o post
Compartilhar em outros sites

Com relação às colunas eu já lhe dei uma resposta tempos atrás :N Colunas, agora com telação à páginação é só você fazer uma busca que já temos algumas respostas.

Compartilhar este post


Link para o post
Compartilhar em outros sites

<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td height="18"></td></tr><tr><td><%pagina = Request.QueryString("pagina")If pagina = "" Then pagina = 1Else pagina = CInt(Request.QueryString("pagina")) End If Set Rsimg = Server.CreateObject("ADODB.Recordset")sql = "SELECT * FROM <tabela>"Rsimg.CursorType = 3Rsimg.PageSize = 16Rsimg.CacheSize = 16Rsimg.open sql, connIf Rsimg.RecordCount = 0 Then %><div align="center">Nenhuma imagem disponível até o momento!</div><%elseRsimg.AbsolutePage = paginaEnd if%><table border="0" cellpadding="0" cellspacing="0"><%Do While Not Rsimg.eof and Rsimg.AbsolutePage = pagina%><tr><td height="6" colspan="12"></td></tr><tr><%coluna = 0Do While coluna < 4 and not Rsimg.eof%><td width="15"> </td><td><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td align="center<img src="images/portfolio/<%=Rsimg("img_pq")%>"></td></tr><tr><td>Imagem<td></tr></table></td><td width="15"> </td><%Rsimg.MoveNextcoluna = coluna + 1loop%><tr><td height="6" colspan="12"></td></tr><%loop%></table>img.RecordCount = 0 Then %></body></html><%response.EndEnd If%><map name="paginacao"><%If pagina > 1 Then%> <a href="<nome do arquivo>.asp?pagina=<%=pagina-1%>">Voltar</a><%End ifIf strcomp(pagina, Rsimg.PageCount) <> 0 then %><a href="="<nome do arquivo>.asp?pagina=<%=pagina+1%>">Próxima</a><%End IfRsimg.CloseSet Rsimg = Nothingconn.CloseSet conn = Nothing%>Mais ou menos isso, adapta de acordo com a sua necessidade!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

o código tá meio bagunçado porque eu catei um que eu utilizei e tirei algumas coisas, mas se você rever o código, até mesmo pra entende-lo vai conseguir corrigi-loprecisando posta de novo!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Patricia vou testar aqui qualquer coisa posto uma nova msg ok ? Muito obrigado a você a todos pela paciencia e compreensao...VALEU !

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.