Creo que ya te he entendido, pero no lo tengo muy claro, repites dentro del bucle while el if intx Mod2= 0 then strgbcolor......?
yo hago algo parecido no se si sera menos eficiente o si consumira mas recursos pero funciona!!!
---------------------------------------------------------------------------------------------------------------------------------------------------------
Dim cont
Dim contador
Dim elcolor
Dim aux
Dim RS
<% do while not RS.eof
if cont mod 2 = 0 then
elcolor="#B0AFBE"
Else
elcolor="#929AAF"
End if
cont=cont+1
%>
<tr marginwidth="0" bgcolor='<%=elcolor%>' OnMouseOver="this.style.backgroundColor='#A49EBC'" OnMouseOut="this.style.backgroundColor='<%=elcolor %>'">
<%
for aux = 0 to RS.Fields.Count -1
%>
<td marginwidth="0" ALIGN=CENTER >
<!--Aquí pones lo que quieras mostrar, tal y como yo lo tengo muestra todo el contenido de la tabla, prueba a poner tus condiciones para los registros "R" a ver que tal te va--!> <%= RS(aux) %>
</td>
<%
next
%>
</tr>
<%
contador=contador+1
RS.movenext
loop
%>
</table>
---------------------------------------------------------------------------------------------------------------------------------------------------------
Bueno espero que te sirva de ayuda a mi me funciona perfectamente en todas mis paginas
bueno pues si tienes algun prblemilla mas ya sabes cual es el mejor foro de todo intenné
agur!!!
