Alternar colores en RecordSet

[Mecenias]

Prueba este codigo:
<pre>

Do While Not result.EOF

if colorfila = 0 then
color= &quot;#DEDEBE&quot;
colorfila=1
else
color=&quot;#F0F0F0&quot;
colorfila=0
end if

'Imprimimos el registro con el bgcolor
response.write &quot;&lt;tr&gt;&lt;td width='50' bgcolor='&quot;&amp;color&amp;&quot;'&gt;&lt;font face='Arial' size='2'&gt;&quot;&amp;result(&quot;id&quot;)&amp; &quot;&lt;/font&gt;&lt;/td&gt;&lt;td width='100' bgcolor='&quot;&amp;color&amp;&quot;'&gt;&lt;font face='Arial' size='2'&gt;&quot;&amp;result(&quot;nombre&quot;)& amp;&quot;&lt;/font&gt;&lt;/td&gt;&lt;td width='100' bgcolor='&quot;&amp;color&amp;&quot;'&lt;font face='Arial' size=&quot;2&quot;&gt;&quot;&amp;result(&quot;apel lido&quot;)&amp;&quot;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&quot;

'Pasa a la siguiente fila
result.MoveNext
Loop

</pre>


Saludos, nos cuentas