Adquação de código

[marvazoler 0]

Olá galera beleza?

 

Olha estou apanhando muito do código abaixo

 

já refiz o scritps, mas nada, já montei um script para contador e nada, quero que o campo CENTRO mostre os dados em colunas horizontalmente, se algem poder me ajudar!! fico muito grato

<table width="400" height="115" border="0" align="center" cellpadding="0" cellspacing="0" class="edit">
  <tr valign="top"> 
	<td width="555" height="113"> 
	  <div align="center"> 
		<table width="400" border="0" cellspacing="0" cellpadding="0" height="88" >
		  <tr bgcolor="#FFFFFF"> 
			<td colspan="2" bgcolor="#666666"> 
			  <div align="right"></div>
			  <div align="center"> <font color="#FFFFFF" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>GRUPO:  
				<% Response.Write ("0" & oRs("COD_LINHA"))%>
				- 
				<% Response.Write oRs("LINHA")%>
				</strong></font><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong> 
				</strong></font> </div></td>
		  </tr>
		  <tr> 
			<td colspan="2"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> </font></td>
		  </tr>
		  <%
			' Declaração da variavel Referencia_anterior
			Dim dia_anterior			
			dia_anterior = 0
			Dim Referencia_anterior			
			Referencia_anterior = 0
			Do while not oRs.eof
		%>
		  <tr> 
			<% 
		   	'Compara o valor do registro anterior com o atual e caso seja diferente ele cria os componentes na tela, impedindo que uma referencia seja repetida		   
		   	if (oRs("REFERENCIA") <> Referencia_anterior) then
				Referencia_anterior = oRs("REFERENCIA")
		   %>
			<td height="20" colspan="2" valign="middle" bgcolor="#CCCCCC"> 
			  <div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong><font color="#0000FF"><strong> 
				<% Response.Write oRs("REFERENCIA.DESCR")%>
				</strong></font></strong> </font></div></td>
		  </tr>
		  <%end if%>
		  <tr> 
			<% 
		   	'Compara o valor do registro anterior com o atual e caso seja diferente ele cria os componentes na tela, impedindo que uma referencia seja repetida		   
		   	if (oRs("COD_DIA") <> dia_anterior) then
				dia_anterior = oRs("COD_DIA")
		   %>
			<td height="19" colspan="2" valign="top" bgcolor=""><div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong><font color="#0000FF"><strong> 
				<% Response.Write oRs("DIA")%>
				</strong></font></strong></font></div></td>
		  </tr>
		  <Tr>		   <%end if%>				
			<Td><div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=oRs("centro")%> 
				/ <%=oRs("trajeto")%></font></div></td>
		  </tr>
		  <Tr> 
		  </tr>
		  <%
	 oRs.movenext
	  Loop
		%>
		</table>
		<div align="left"><img src="bot%F5es.png" onClick="java script:history.back(-1)"></div>
		</div></td>
  </tr>
</table>

Desde já agradeço

[dataset 0]

As tags <tr></tr> no HTML, criam uma nova linha(vertical), já as tags <td></td> criam colunas(horizontal), partindo desse ponto, se os <tr></tr> estiverem dentro do loop, cada volta que ele dá uma nova linha é criada. Se os <tr></tr> estiverem fora, e apenas os <td></td> estiverem dentro do loop, apenas uma linha será criada e a cada volta do loop novas colunas vão sendo formadas, uma do lado da outra, na horizontal.

 

Att;

[marvazoler 0]

Olá camarada beleza?

 

Deixa eu te falar, eu fiz o que você falou mas não deu certo quebro o me if de referencia e dia

 

olha isso por favor

 

 

<Tr> <%do while not oRs.eof

coluna = coluna +1%>

<Td><div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=oRs("centro")%>

/ <%=oRs("trajeto")%></font></div></td>

<%if coluna >= 3 then

coluna =0 %>

</tr>

<Tr> <%end if%>

</tr>

<% oRs.movenext

Loop

Loop

%>

</table>