Limitando A Quantidade De Fotos Na Linha

[Destroyer]

Olá galera, tudo bem?

Estou com um pobleminha aqui para limitar a quantidade de fotos que deverão ser exibidas numa página...

quero chegar no seguinte cenário utilizando tabelas:

| foto1 | foto2 | foto3 | foto4 |

| foto5 | foto6 | foto7 | foto8 |

Ficaria mais ou menos desta forma:

<table>
   <tr>
      <td>foto1</td>
      <td>foto2</td>
      <td>foto3</td>
      <td>foto4</td>
   </tr>
   <tr>
      <td>foto5</td>
      <td>foto6</td>
      <td>foto7</td>
      <td>foto8</td>
   </tr>
</table>

E para chegar neste cenário eu estou utilizando o seguinte código:

<% if not rsModelos.EOF then
     rsModelos.Movefirst %>

<table width="100%" border="0" cellspacing="5">
      <% i = 0
         do until i = 6 %>
      <tr> 
      <% for j = 0 to 4
            do until rsModelos.EOF %>
          <td width="25%">
            <div align="center">
              <img src="<% =rsModelos("foto") %>" width="118" height="105">
            </div>
            <div align="center">
              <A class=titulo href="modelo.asp?id=<%=rsModelos("id_modelo")%>"><% =rsModelos("nome_fant") %></A>
            </div>
          </td>
      <% rsModelos.Movenext 'incremendo (do until rsModelos.EOF)
            loop 'loop (do until rsModelos.EOF)
            i = i + 1
            next  'next (for j = 0 to 4)%>
       </tr>
       <% loop 'loop do comando (do until i = 6)%>
</table>

<% end if %>

Acontece que com este a página não carrega... Fica como se estivesse dando looping direto.

Alguém sabe onde estou errando???

Abraços,

Destroyer.

[Woody]

Utilize-se de meios matemáticos.

Faça um MOD 4. Se der zero, voce faz com que apareça em outralinha da tabela.

Ficaria algo do Genero:

Cont = 0
<%do until rsModelos.EOF 
   if Cont MOD 4 = 0 then %>
   <tr>
    <%end if%>
         <td width="25%">
           <div align="center">
             <img src="<% =rsModelos("foto") %>" width="118" height="105">
           </div>
           <div align="center">
             <A class=titulo href="modelo.asp?id=<%=rsModelos("id_modelo")%>"><% =rsModelos("nome_fant") %></A>
           </div>
         </td>
   if Cont MOD 4 = 3 then %>'Essa linha é interessante
   </tr>
    <%end if%>
     <% rsModelos.Movenext 'incremendo (do until rsModelos.EOF)
            Cont = Cont +1
            Loop%>

Bom, esse exemplo não resolve 100% o seu problema, mas já ajuda como resolver os outros....

Até +

[DackAle]

bom eu mesmo postei aqui no forum na parte de codigos, um codigo que gera tabelas dinamicas, bem do jeito que tu quer, facinho de entender =)

Abraços

[cyberalexxx]

também acho q através da função MOD é a melhor maneira, você tambem pode testar o valor da variavel caso seja > 4 nova linha e variavel=1

[Destroyer]

Utilize-se de meios matemáticos.

Faça um MOD 4. Se der zero, voce faz com que apareça em outralinha da tabela.

Ficaria algo do Genero:

Cont = 0
<%do until rsModelos.EOF 
   if Cont MOD 4 = 0 then %>
   <tr>
    <%end if%>
         <td width="25%">
           <div align="center">
             <img src="<% =rsModelos("foto") %>" width="118" height="105">
           </div>
           <div align="center">
             <A class=titulo href="modelo.asp?id=<%=rsModelos("id_modelo")%>"><% =rsModelos("nome_fant") %></A>
           </div>
         </td>
   if Cont MOD 4 = 3 then %>'Essa linha é interessante
   </tr>
    <%end if%>
     <% rsModelos.Movenext 'incremendo (do until rsModelos.EOF)
            Cont = Cont +1
            Loop%>

Bom, esse exemplo não resolve 100% o seu problema, mas já ajuda como resolver os outros....

Até +

Grande Woody,

Eu não sei com o que você quis dizer: "Bom, esse exemplo não resolve 100% o seu problema, mas já ajuda como resolver os outros...."

Pois bastou eu copiar e colar o código para funcionar exatamente como eu quero.

Muito obrigado pela ajuda!

Abraços,

Destroyer.