Mostrar 3 Imagens A Cada Linha Da Tabela

[Guest Eloisa]

Olá amigos!

Bom, quero mostrar na tela 3 fotos por linha e não estou conseguindo.

Ex: Se eu tiver 6 fotos, irá aparecer 3 fotos em cima e 3 fotos em baixo.

Do jeito que está ele está mostrando um foto por linha...

<table border="0" cellspacing="1" style="border-collapse: collapse" width="37%" id="table1">

<tr>

<%

If rs.EOF or rs.BOF Then

Response.Write "<font face=Verdana size=2><strong> Não foi encontrado nenhum registro.</strong></font>"

%>

<% Else

Do While not rs.EOF

intCounter=intCounter+1

intMod=intcounter mod 2

if intmod=0 then

rcolor = "#c0c0c0"

elseif intmod=1 then

rcolor = "#FFFFFF"

end if

%>

<td width="13%"><font face="Verdana" size="2"><img src=<%=rs("foto")%> width="150" height="150"></font></td>

</tr>

<%

rs.MoveNext

Loop

End If

rs.close

set rs = nothing

set conexao = nothing

%>

</table>

Desde já agradeço,

Eloisa

[fercosmig]

<table border="0" cellspacing="1" style="border-collapse: collapse" width="37%" id="table1">

<tr>

<%

If rs.EOF or rs.BOF Then

Response.Write "<font face=Verdana size=2><strong> Não foi encontrado nenhum registro.</strong></font>"

%>

<% Else

Response.Write "<table>"

Do While not rs.EOF

Response.Write "<tr>"

for i=0 to 2

if not rs.eof then

intCounter=intCounter+1

intMod=intcounter mod 2

if intmod=0 then

rcolor = "#c0c0c0"

elseif intmod=1 then

rcolor = "#FFFFFF"

end if

%>

<td width="13%"><img src=<%=rs("foto")%></td>

else

<td width="13%">&nbsp;</td>

<%

end if

Next

%>

</tr>

<%

rs.MoveNext

Loop

End If

rs.close

set rs = nothing

set conexao = nothing

%>

</table>

não teste o codigo, mas é mais ou meno isso ae! faz um teste!

abraços

[Guest Eloisa]

Tá quase dando certo! A tabela já está sendo dividida em 3 colunas por linha.

O único problema é que as fotos estão iguais a cada linha:

ex:

foto.jpg,foto.jpg,foto.jpg

foto2.jpg,foto2.jpg,foto2.jpg

foto3.jpg,foto3.jpg,foto3.jpg

.

.

.

[fercosmig]

<table border="0" cellspacing="1" style="border-collapse: collapse" width="37%" id="table1">

<tr>

<%

If rs.EOF or rs.BOF Then

Response.Write "<font face=Verdana size=2><strong> Não foi encontrado nenhum registro.</strong></font>"

%>

<% Else

Response.Write "<table>"

Do While not rs.EOF

Response.Write "<tr>"

for i=0 to 2

if not rs.eof then

intCounter=intCounter+1

intMod=intcounter mod 2

if intmod=0 then

rcolor = "#c0c0c0"

elseif intmod=1 then

rcolor = "#FFFFFF"

end if

%>

<td width="13%"><img src=<%=rs("foto")%></td>

else

<td width="13%">&nbsp;</td>

<%

end if

rs.MoveNext

Next

%>

</tr>

<%

rs.MoveNext

Loop

End If

rs.close

set rs = nothing

set conexao = nothing

%>

</table>

então! eu esqueci de um detalhe rssss

faz um teste ae!

abraços

[Guest Guest]

Oi Fercosmig!

Era isso mesmo! Obrigada!

Abraços!