colorare righe recordset a secondo dei dati

[Davide_74]

Nella ricerca non ho trovato niente di specifico, prova a fare un nuovo post !

Se ho un recordset tipo :

<%
Dim rs_esempio
Dim rs_esempio_numRows

Set rs_esempio= Server.CreateObject("ADODB.Recordset")
rs_esempio.ActiveConnection = MM_conn_database_STRING
rs_esempio.Source = "SELECT * FROM tabella
rs_esempio.CursorType = 0
rs_esempio.CursorLocation = 2
rs_esempio.LockType = 1
rs_esempio.Open()

rs_esempio_numRows = 0
%>

se metto i dati in una tabella della pagina ... posso colorare le righe a seconda dei dati ?
Cioè, posso colorare di giallo le righe che hanno in un determinato campo una determinata parola ?

Grazie per l'aiuto

[21-12]

Io uso questo vedi se ti va bene
<%
i ="#ffffff"
l ="#f0f0f0"
a=1
do while not rs.eof
%>
<tr bgcolor="<%if a mod 2 = 0 then
response.write i
else
response.write l
end if%>">
<td>
......</td>
</tr>
<%a=a+1
rs.movenext
loop%>

ciao

[Davide_74]

Scusa ma non riesco a capire dove sono le variabili da impostare per un determinato colore ...

se ad esempio il valore da colorare fosse "pippo" nel campo di database "utente" , dove vado a mettere questi due valori ?

[21-12]

Si scusami sono stato troppo veloce e non mi ero accorto delle parole.
<td bgcolor="<%
cerca="pippo"
frase=rs("descrizione")
frase = replace(frase,","," ,")
ArrayText = Split(frase)
For Each Word in ArrayText
If Word = lcase(cerca) Then
Response.Write "colore cella con parola"
elseif Word = Ucase(cerca) Then
Response.Write "colore cella con parola"
elseif Word = Ucase(left(cerca,1))&lcase(mid(cerca,2)) Then
Response.Write "colore"
else
Response.Write "altrocolore "
End If
next%>">
non lo ho provato ma credo funzioni
ciao

[Davide_74]

Stasera provo poi ti so dire

[Davide_74]

Funziona tutto grazie !!

Ti chiedo un'ultima cosa ....

E se volessi inserire più di un valore ?? (per esempio pippo pluto e paperino ... nello stesso campo)
E' posssibile ? Come devo fare ??

Grazie ancora !

[21-12]

cioè?

[Davide_74]

Il campo di database che a cui vorrei applicare questo script ha diversi valori ...
Adesso colora le righe se è presente un determinato valore , nell'esempio "pippo".

Posso inserire più di un valore oltre a "pippo" ?

[21-12]

non so se ho capito bene.
vuoi colorare le righe ove è presente un valore preso da una stringa di ricerca che è composta da piu parole?

<td bgcolor="<%

frase=rs("descrizione")
frase = replace(frase,","," ,")
ArrayText = Split(frase)
For Each Word in ArrayText
cerca=split(request("cerca"))
for i = 0 to ubound(cerca)
If Word = lcase(cerca(i)) Then
Response.Write "colore cella con parola"
elseif Word = Ucase(cerca(i)) Then
Response.Write "colore cella con parola"
elseif Word = Ucase(left(cerca(i),1))&lcase(mid(cerca,2)) Then
Response.Write "colore"
else
Response.Write "altrocolore "
End If
next
next%>">

prova con questo

[Davide_74]

In pratica vorrei colorare le righe di tabella dove sono presenti i valori "pippo" "paperino" e "pluto" , che non possono essere però nella stessa riga , ma in righe diverse .
Ovviamente il campo del database è lo stesso ...

Con l'esempio che mi avevi dato coloro solo le righe con un valore , nel caso "pippo", volevo sapere se si poteva aggiungere altri valori ..

al limite provo a postare il codice se non riesco a spiegarmi bene ...

Grazie per la pazienza