alternare colore righe

[pippaccia1971]

ragazzi salve a tutti
c'è un modo per alternare il colore delle righe in base al valore di un campo ?
es.
io ho una lista fatta cosi

agenzia; nome
2800;fabio
2800;raffaele
2801;carlo
2801;giulio
2802;marcello
2802;agata

questa lista viene creata leggendo l'agenzia da un DB. Io vorrei che ad ogni cambiamento di agenzia venisse cambiato anche il colore
es.
ho due colori giallo e verde

2800 giallo
2801 verde
2802 giallo

ecc...
alternare i due colori in base all'agenzia.
Mi aiutate?
grazie mille

[optime]

nel ciclo di lettura e stampa, salvati una variabile di comodo col valore dell'agenzia letta *prima* di passare alla successiva. qualndo leggi, se il valore salvato è diverso dall'agenzia in memoria, cambi il colore.

[pippaccia1971]

l'ho fatto ma quello va bene per le singole righe alternate... diventa piu complicato quando devo colorare più righe dello stesso colore

[robbe2000]

se ti memorizzi l'agenzia e lavori su id agenzia la logica è la stessa come ti ha detto optime

[pippaccia1971]

cioè ho piu righe che dovrebbero essere di uguale colore per lo stesso codice agenzia

[pippaccia1971]

e che mi sto impappinando
ho fatto una cosa del genere

do while not rs.eof
if v_Agenzia=rs("Agenzia") then
bgcol = "#e6eff4"
else
bgcol = "#eae6e6"
' qui non posso riassociare v_agenzia con rs("Agenzia") altrimenti tornerebbe al primo colore
end if

rs.movenext
loop

[optime]

metti

v_Agenzia=rs("Agenzia")

prima di

rs.movenext

[robbe2000]

ti facci esempio è molto semplificato ovviamente

<%
cod_ag = 0

strcolore = "giallo"
strcolore1 = "verde"
strColor = strcolore
contcol = 0

'ciclo  per tutte le righe

while not rs.oef
if cint(cod_ag) <> rs("id_agenzia")then

     cod_ag = rs("id_agenzia")

     if contcol  = 0 then 
            contcol =1
            strColor = strcolore1
     else
            contcol =0
           strColor = strcolore
    end if

    strColor = strcolore1
end if

'a questo punto utilizzi la variabile strcolor per colorare le righe a tuo piacimento
rs.movenext
wend



%>

[pippaccia1971]

niente non funge :-((

[wallrider]

Originariamente inviato da pippaccia1971
niente non funge :-((

"non funge" non ci aiuta
hai seguito il suggerimento di optime? hai modificato il codice ispirandoti a quello di robbe2000?
posta il codice