Visning af data

Hejsa...

Jeg er ved at lave et forum på min hjemmeside og de forum kategorier der er på siden bliver vist på en lang liste i en tabel, nu er spørgsmålet så hvordan laver jeg 2 forskælige bagrunde ? Altså sådan er hver anden tabel ?
Sådan:

Blå
Hvid
Blå
Hvid
Blå
Hvis
OSV....

Lige nu er alle tabellerne bare blå hele vejen ned....

Sådan hiver jeg dataen ud fra databasen og ind i en tabel på siden:
------------------------
    <table border="1" width="510" cellspacing="0" cellpadding="0" bordercolor="#FFFFFF" height="85">
    <tr>
    <td width="518" colspan="2" bgcolor="#0054C6" height="21">
    <font face="Arial" color="#FFFFFF" size="2"><b>Forum</b></font></td>
    </tr>
    <tr>
    <td width="308" height="18" bgcolor="#85C4FA"><font face="Arial" size="2">Forum</font></small></td>
    <td width="208" height="18" bgcolor="#85C4FA"><font face="Arial" size="2">Seneste indlæg</font></small></td>
    </tr>
   
    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("../Database/Bodykits.dk/brugersystem.mdb")
    strSQL = "SELECT * FROM forum WHERE online=true ORDER BY id;"
    set rs = Conn.execute(strSQL)
    if rs.EOF then
    Response.write "<font face=""Arial"" size=""2"" Color=""RED""><center><b>Tom kategori.<br>Bodykits.dk beklager!</b></center></font>"
    else
    Do Until rs.EOF
    %>
    <tr>
    <td width="308" height="19" bgcolor="#85C4FA"><font face="Arial" size="2">
    <b><A HREF="foruminlag.asp?id=<%=RS("id")%>"><%=RS("ForumNavn")%></a></b>
    <br>
    <%=RS("ForumIndhold")%>
    </font></td>
    <td width="208" height="19" bgcolor="#85C4FA"><font face="Arial" size="2">
    Søndag, d. 4-5-03&nbsp;17:07
    <br>
    <i>Brian Jørgensen</i>
    </font>
    </td>
    </tr>
    <%
    RS.MoveNext
    Loop
    end if

    Conn.Close
    Set Conn = Nothing
    %>
    </table>    <tr>
    <td width="308" height="19" bgcolor="#85C4FA"><font face="Arial" size="2">
    <b><A HREF="foruminlag.asp?id=<%=RS("id")%>"><%=RS("ForumNavn")%></a></b>
    <br>
    <%=RS("ForumIndhold")%>
    </font></td>
    <td width="208" height="19" bgcolor="#85C4FA"><font face="Arial" size="2">
    Søndag, d. 4-5-03&nbsp;17:07
    <br>
    <i>Brian Jørgensen</i>
    </font>
    </td>
    </tr>
    <%
    RS.MoveNext
    Loop
    end if

    Conn.Close
    Set Conn = Nothing
    %>
    </table>
-------------------------

Den laver alså en ny <TR><TD> </TD><TR> for hver kategori der ligger i databasen... Og hver anden skal have en hvid baggrund.... Det er det hele :-)