Como listar produtos um ao lado do outro

[natalia 0]

Oi pessoal, como eu faço p/ o resultado do meu loop ficar um do lado do outro? O meu código está funcionando, mas ele lista os produtos um em baixo do outro, preciso que fica do lado, abaixo está o meu código apenas a parte do loop. Alguém saberia me explicar? <table width="136" border="0" cellspacing="0" cellpadding="0"> <% Do While Not rsComp.EOF %> <tr> <td><img src="<%= rsComp("Logo")%>"></td> </tr> <tr> <td><a href="produto/detalhes.asp?CodProd=<%=rsComp("Codigo_Prod")%>&CodCat=<%=rsComp("Codigo_Cat")%>&CodSubcat=<%=rsComp("Codigo_Subcat")%>&CodSubPai=<%=rsComp("Codigo_SubPai")%>"><img src="<%= rsComp("Imagem_Prod")&rsComp("Codigo_Prod")&"_m.jpg"%>" border="0" width="100" height="80"></a></td> </tr> <tr> <td><a href="produto/detalhes.asp?CodProd=<%=rsComp("Codigo_Prod")%>&CodCat=<%=rsComp("Codigo_Cat")%>&CodSubcat=<%=rsComp("Codigo_Subcat")%>&CodSubPai=<%=rsComp("Codigo_SubPai")%>" class="nome-pord"><%= Left(rsComp("Nome_Prod"),50)%></a></td> </tr> <tr> <td><a href="carrinho/carrinho.asp"><img src="../images/comprar.gif" width="62" height="15" border="0"></a></td> </tr> <tr> <td><img src="../images/curva-compare1.gif" width="136" height="14"></td> </tr> <tr> <td><span class="preco">R$</span> <span class="preco"><%= FormatNumber(rsComp("Preco"),2)%></span></td> </tr> <tr> <td> <table width="134" border="0" cellspacing="0" cellpadding="0"> <tr> <td align="center"><font face="Arial, Helvetica, sans-serif" size="1" color="#FF3300">40%</font></td> </tr> <tr> <td align="center"><img src="../images/vus/40.jpg" width="112" height="8"></td> </tr> </table> </td> </tr> <tr> <td> <table width="134" border="0" cellspacing="0" cellpadding="0"> <tr> <td align="center"><font face="Arial, Helvetica, sans-serif" size="1" color="#FF3300">80%</font></td> </tr> <tr> <td align="center"><img src="../images/vus/80.jpg" width="112" height="8"></td> </tr> </table> <%strComp2 = " SELECT Produto.Codigo_Prod, Caracteristica.*, Prod_Caract.* FROM Produto INNER JOIN Prod_Caract "strComp2 = strComp2 & " ON Produto.Codigo_Prod = Prod_Caract.Codigo_Prod INNER JOIN Caracteristica "strComp2 = strComp2 & " ON Prod_Caract.Codigo_Caract = Caracteristica.Codigo_Caract "strComp2 = strComp2 & " WHERE Produto.Codigo_Prod = " & rsComp("Codigo_Prod")Set rsComp2 = Conexao.Execute(strComp2) Do While Not rsComp2.EOF %> </td> </tr> <tr> <td class="descr01"><%= rsComp2("Conteudo")%></td> </tr> <tr><%rsComp2.MoveNextLooprsComp.MoveNextLoop%>

[agece 0]

É assim que você quer a lista:Produto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoProduto ProdutoAdalberto.

[natalia 0]

Sim, mas será apenas uma linha com cinco produtos, um ao lado do outro.Eu tenho esse script que funciona em outra página, mas como este código tem 2 loops ainda não consegui adapta-lo p/ esse script. <%While Not rsPrinc.EOF Response.Write "<tr>"For P = 1 To 3 'aqui define qtos produtos mostrar por linhaIf rsPrinc.EOF = True Then Exit ForResponse.Write "<td>"Response.Write "<table align='center' border='0' width='100%' cellpadding='1' cellspacing='0'>"Response.Write "<tr>"%> <%Response.Write "</tr>"Response.Write "</table>"Response.Write "</td>"rsPrinc.MoveNextNextResponse.Write "</tr>"Wend%>

[gastao 0]

esse código nao falha:<table border=1 width=50%> <tr> <% Dim contador contador = 1 maxcol = 5 'AQUI VOCE DIZ O NUMERO DE COLUNAS, NO SEU CASO, 5!do while not rs.eof%> <% if contador <= maxcol then %> <td> <img src="<%=rs("imgp")%>"> </td> <% contador = contador + 1 else %> </tr> <tr> <td> <img src="<%=rs("imgp")%>"> </td> <% contador = 2 end if rs.movenext loop 'completa as colunas do while contador <= maxcol %> <td>   </td> <% contador = contador + 1 loop %> </tr> </table>

[natalia 0]

Obrigada pela ajuda.