[Resolvido] Quebra de tabela em <% do until rs.eof %>

[Thiago Paschoalin 0]

EU procurei essa dúvida, mas não soube o nome do que eu quero;

 

eu fiz um sisteminha de add parceiros e galeria de fotos, bom em parceiros eu fiz a tabela dividir por 2 e deu certinho, olhem:

 

<% 'ComImagem
	sem_imagem = "sem_imagem.gif"
	Set RS = Conn.Execute("SELECT * FROM IMGsParcerias WHERE imagem_Parceria <> '" & sem_imagem & "' ORDER BY nome_Parceria ASC") %>

<table width="534" cellspacing="0" cellpadding="0">

<% do until rs.eof
	
	If soma1 = false Then
	T_Ini = "tr><td width=""177"" height=""100"""
				T_Fim = "/td"
	soma1 = true
	Else
	T_Ini = "td width=""177"" height=""100"""
	T_Fim = "/td></tr"
	soma1 = false
	End If
%>

  <<% = T_Ini %>>
  <span class="Verdana_12_PretoB">
  <img src="<% = rs("caminho_Parceria") & rs("imagem_Parceria") %>" alt="Parceiro: <% = rs("nome_Parceria") %>" border="0">
  </span>
  <<% = T_Fim %>>
  
<% rs.movenext 
loop
Conn.close %>
</table>

Mas o meu problema aparece quando preciso aumentar a quantidade de imagens por linha.

 

Como eu posso fazer para de ao invés de mostrar 2 resultados por linha aparecam 4 ?

Grato desde já.

[Ted k' 126]

veja agora:

<table width="534" cellspacing="0" cellpadding="0">
  <tr>
  <% 'ComImagem
	sem_imagem = "sem_imagem.gif"
	Set RS = Conn.Execute("SELECT * FROM IMGsParcerias WHERE imagem_Parceria <> '" & sem_imagem & "' ORDER BY nome_Parceria ASC")
	
	Dim Contagem : Contagem = 1
	While Not RS.Eof	
	%>
	<td><span class="Verdana_12_PretoB">
  <img src="<% = rs("caminho_Parceria") & rs("imagem_Parceria") %>" alt="Parceiro: <% = rs("nome_Parceria") %>" border="0">
  </span></td>
	<% If Contagem = 4 Then %>
  </tr>
<%
Contagem = 0
End If
RS.MoveNext
Contagem = Contagem + 1
Wend
Conn.close
%>
</table>

Qualquer coisa temos um Tópico de Dúvidas Frequentes que está em Destaque na área principal do fórum de ASP, tem lá tbm:

http://forum.imasters.com.br/index.php...st&p=141006

[Thiago Paschoalin 0]

PERFEITO TED K' !! Vlw guerreiro, por me salvar + 1 vez !! ^^