a la hora de pintar los campos

[suntus]

codigo....

intX = 1
do until rs.eof

if intX Mod 2 = 0 then '*** Even, display Grey
strBGColor = "EEEEEE"
else '*** Odd, display white
strBGColor = "FFFFFF"
end if

if (InStr (Ref,"r") = 1) then

else


lo utilizo para pintar los datos de la DB en la web la parte
if (InStr (Ref,"r") = 1) then

else

me elimina de la lista los articulos que empiezan por r

y esto otro

if intX Mod 2 = 0 then '*** Even, display Grey
strBGColor = "EEEEEE"
else '*** Odd, display white
strBGColor = "FFFFFF"
end if

me colorea las muestras una de cada color para ser mas facilmente visuales.

El problema es q cuando ser cumple la condicion de la r se se muestran dos articulos del mismo color

como resolver esto???

[Subotai]

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!!!

[Bravenap]

Hola de nuevo.

Bueno, vamos allá.

Por lo que veo, lo que haces es que si el número es par (resto de la división entre 2 es nulo) se colorea de gris y si no de blanco ¿no? El problema está en que al eliminar uno de los registros porque empieza por "r", se juntan dos pares o dos impares.

Creo que a lo mejor sería mejor eliminar los registros que empiecen por "r", y con los que quedan ir metiéndolos en celdas mediante un bucle.

De esta manera, al final de cada vuelta cambias una variable a su contraria (true o false) y al inicio del bucle se pone un condicional para que pinte de un color distinto la celda en función del valor de la variable.

Hasta aquí es a donde llego por ahora, quizás con el código completo te pueda decir algo más.

Un saludo.

........ Después de terminar el mensaje ............

¿Qué hay Subotai? Oye, ¿cómo lo haces? Ya van dos veces, , me pongo a responder y cuando termino..... ya te has adelantado.

Bueno, de todas formas, "mejor sobe que no que falte".

Un saludo a los dos.

[Subotai]

Jejejeje suele pasar , a mi me acaba de suceder lo mismo con helbira , pero como tu dices mejor ke sobre ke no ke falte!!!!!
Ala agur!!!
Aupa Erreala la liga ya es nuestra!!!!!!!!