Logica De Tabelas

[DackAle]

E ae galera =)

Aproveitando que estou terminando a programçaõ de um site, acho uma das unicas duvidas que me restaram, é sobre a logica de tabelas dinamicas, o caso é que vou ter que mostrar 5 fotos por linha e uma por coluna, total 5 colunas por linha exemplo:

| X | X | X | X | X |

e quando chegar na 5ª foto (no caso 5ª coluna) ele começa uma nova linha e começa o looping novamente, achei uma logica postada aqui mesmo, mas não sei como faer para fazer o esquema de cinco colunas, o codigo é este:

<table cellspacing="5">
 <tr> 
   <%
n = 1
'n = variável usada pra controlar o nº de regs. p/ linha
l = 5
' l = nº de registros por linha
Do while not RecSet.Eof
%>
   <td width="100"><img src="<%=recset("url")%>" width="100" height="100" border="1"></td>

<%
n = n + 1
' Aumenta 1 nº na variável "n"
RecSet.Movenext

If n > l then
Response.Write "</tr><tr>"
n = 1
'Se a variável "n" for igual à "l", ele cria uma nova linha e volta "n" pra 1
End If

Loop
%>
</table>

Se alguém souber como resolver esse meu problema ficaria muito grato =)

Abraços

[Guest Guest]

A lógica e essa cara!

for i=1 to 5

for z=1 to 5

exibiçao das colunas

next

pular linha

next

[cyberalexxx]

O que codigo que você postou parece estar correto, o q esta acontecendo de errado???

[DackAle]

Cyber o codigo está certo, o que eu quero é adaptar o codigo para ele mostrar 1 registro por coulna e mostrar 5 colunas por linhas, mas estou com dificuldades na adaptação do codigo a logica até sei vendo eesse codigo que coloquei acima...

Abraçossss

[Woody]

Mas o código que você postou faz isso...

De uma olhada e teste novamente esse código....

[cyberalexxx]

Da uma olhada se ficou mais claro:

<table cellspacing="5">
<tr> 
  <%
n = 1
'n = variável usada pra controlar o nº de regs. p/ linha
l = 5
' l = nº de registros por linha
Do while not RecSet.Eof
%>
  <td width="100" width="100" height="100" border="1">
<%
' mostre aqui os dados do registro
response.write "mostrando o registro"
response.write "<br>" & "mostrando o registro"
%>
</td>
<%
n = n + 1
' Aumenta 1 nº na variável "n"
RecSet.Movenext

If n > l then
Response.Write "</tr><tr>"
n = 1
'Se a variável "n" for igual à "l", ele cria uma nova linha e volta "n" pra 1
End If

Loop
%>
</table>

[DackAle]

AAA consegui ahahahahahahahaha nada como uns 20 minutos de logica para chegar no resultado ahahahah resolvi da seguinte maneira

<%
n = 1

c = 5

Do while not RS.Eof
%>
  <td width="20%"><%=RS("titulo")%></td>
<%
n = n + 1

RS.Movenext

If n > c then
response.write "</tr><tr>"
n = 1

End If

Loop
%>

Valeu ae galera =)

Abração

[cyberalexxx]

coloca o seu codigo completo aqui pra gente ver, pois o objeto necessário deve ser o recordset pois é o unico objeto existente nesse codigo.

[Guest Guest]

porque não esperimento a logica que eu passei?? bem mais simples!!!!!

<%
for z=1 to n
	for i=1 to 5
	response.Write(RS("titulo"))
	RS.Movenext
	next
response.Write("<br>")
next
%>

[Guest Guest]

antes que pergunte "n" e o numero total de registro de sua tabela!!! agora e so você montar a tabela a seu gosto!

[dlumeida]

a lógica e boa, mas o codigo esta errado! o certo e isso!!

<%
'tot=RS.recordcount
'tot-> total de registro em sua tabela!
cont=1 'Variavel para poder contar
n=(tot/5)+1 'Determina o numero de linhas que vão ser geradas (total / 5 colunas em cada linha) +1 no caso de divisao não exata
for z=1 to int(n) 'Loop para gerar as linhas
   for i=1 to 5 'Loop para gerar colunas
      if cont<=tot then
         response.Write(RS("Titulo"))
         RS.Movenext
      end if
   cont=cont+1
   next
response.Write("<br>")
next
%>

[DackAle]

Errado ? aqui ta funcionando perfeitamente heheheheehe pode não ser o melhor do mundo mas serviu para mim ehehehehe alem que para iniciantes não é dificil de entender, mas logico ao passar do tempo vo melhorando a logica e posso fazer de melhores formas

Alem disso, não é que eu não quero ajuda, ao contrario, afinal estou em constante aprendizado, mas gosto de tentar fazer sozinho para não ficar acomodado, sabe, dai gosto quando me dão a logica e tal.... q dai eu tenho q pensar e isso é muito bom na programação....

Abração e valeu por tudo mesmo galera =)

    	
<%
SQL = "SELECT titulo FROM links ORDER BY id DESC"
RS.Open SQL, conexao,3,3 
%>
<table>
<tr> 
<%
n = 1
c = 5
Do while not RS.Eof
%>
<td width="20%"><%=RS("titulo")%></td>
<%
n = n + 1
RS.Movenext
If n > c then
response.write "</tr><tr>"
n = 1
End If
Loop
%>
</table>

[dlumeida]

não cara, eu felei daquele que "guest" postou!!!!

[bareta]

ai galera eu uso esse codigo na minha galeria de fotos e funciona d boa.... fui eu quem indicou ao dack ale