tablas multicolores

[dark_night]

holas

gracias por la respuesta...
le hice un par de cambios par adaptarla a lo ke ya tenia..pero ahora pone todas las filas en rojo

Código:

<% strconn= "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("bd1.mdb")
   Set Conn= Server.CreateObject("ADODB.Connection")
   Conn.Open strconn
	 sSQL= "Select * From usuario Order By RUT"
	 set RS= Conn.Execute(sSQL) %>
<table border="1" align="center">
  <tr>
     <td>RUT</td>
     <td>Direccion</td>
     <td>Razon Social</td>
     <td>Estado</td>
  </tr>
  <% Do While Not Rs.Eof  
	
       if colorfila= 0 then
 	color= "#6666ff"
	colorfila=1
       else
	color= "#66ccff"
	colorfila=0
       end if
   %>	
  <tr>
     <td bgcolor=color><%=Rs("RUT")%></td>
     <td bgcolor=color><%=Rs("Direccion")%></td>
     <td bgcolor=color><%=RS("razon_social")%></td>
     <td bgcolor=color><%=RS("Estado")%></td>
  </tr>
	
    <% 
     Rs.MoveNext
     Loop
	
    Set Rs = Nothing
    Conn.Close
    Set conn= Nothing
      %>
</table>

nose en ke me ekivoke...ayudenme plz :p
gracias