2 replies to this topic

[maxcs]

Ola, estou com o código a abaixo que exibe uma lista de nomes em uma tabela...
Alguém pode me ajudar a colocar uma linha da tabela de cor CCCCCC e outra FFFFFF alternadamente?
Obrigado.


------------------------------------------------------------------

<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "DBQ=" & Server.MapPath("banco.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"
strQuery = "SELECT * FROM usuarios"
Set ObjRs = objConn.Execute(strQuery)
%>

<table bgcolor=#FFFFFF border=1 width=50%>

<%While Not objRS.EOF %>
<tr><td bgcolor=#FF9900><%Response.write objRS("nome")%></td></tr>

<%
objRS.MoveNext
Wend
objRs.close
objConn.close
Set objRs = Nothing
Set objConn = Nothing
%>

</table>

---------------------------------------------------------------------

[jeanpaulo5]

Oq vc diz com "alternadamente"?
Naum entendi direito, mas isto naum eh Javascript?

[Lengrat]

Adapte ao seu código ae...

Onde está de vermelho é o loop
para ir alternando as cores do BG.
e o <%=Bg%> resgata cor para a linha

<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" style="border: 1px solid #000000">
<tr bgcolor="#000066">
<td width="45%" bgcolor="#006699"><div align="center" class="cabecalho">Data </div></td>
<td width="55%" bgcolor="#006699">
<div align="center" class="cabecalho">
<div align="left">Usu&aacute;rio Depositante </div>
</div></td>
</tr>
<%
sql="SELECT nome FROM membros WHERE usuario='"& usuario &"'"
set rs= conexao.execute(sql)
nome= rs.Fields("nome")
sql2="SELECT TOP 10 * FROM deposito WHERE confirmado='sim' AND ( aleatorio1='"& nome &"' OR aleatorio2='"& nome &"' ) ORDER BY data DESC "
set rs2= conexao.execute(sql2)
cor = 1
if rs2.EOF <> false Then
response.write "<br><font size=2 face=Verdana, Arial, Helvetica, sans-serif>N&atilde;o existem Depósitos</font>"
else
while not rs2.eof
if (cor = 1) then
bg = "#FFFFFF"
cor = 2
else
bg = "#CCCCCC"
cor = 1
end if
%>
<tr>
<td width="45%" bgcolor="<%=bg%>"><div align="center"><%=rs2("data")%></div></td>
<td width="55%" bgcolor="<%=bg%>"><%=rs2("usuario")%></td>
</tr>
<% rs2.movenext
wend
End If
%>
</table>

Abraços camarada

Edição feita por: Lengrat, 10/10/2004, 17:11.