Tabela com cores alternadas

Para listar todos os dados de um recordset em uma tabela usando cores alternadas, faça o seguinte:

<% sql = "select * from tabela"
     Set Rs = conexao.execute(sql)
     cor = 1
     do while not rs.eof
             if (cor = 1) then
                 bg = "#FFFFFF"
                 cor = 2
             else
                 bg = "#000000"
                 cor = 1
             end if
             %>
              <td bgcolor="<%=bg%>">rs("nome")</td>
    <%   rs.movenext
     loop %>

Esta matéria foi postada originalmente no ASP4Developers por Kleber Shimabuku (site), que na época era "Programador ASP". Hoje, vai saber...