Celle da colorare secondo valore

[Enrique_Rojas]

Ciao vengo dal forum di ASP, dove forse ho sbagliato a postare...
il problema è questo:

-i record del dbase si distinguono perchè un campo della tabella assume valore diverso: libero, occupato, disponibile, standby

-vorrei colorare la riga di ogni singolo record estratto secondo la condizione del campo, cioè se:

-campo=libero la riga di quel record è di colore verde
-campo=occupato la riga di quel record è di colore rosso
-campo=disponibile la riga di quel record è di colore giallo
etc etc, ed ho scritto così:

'parte ASP
Select Case rs("stato")
  Case "libero"
    bg = "green"
  Case "occupato"
    bg = "red"
  Case "disponibile"
    bg = "yellow"
End Select

'parte html:
Response.Write "<tr>"
Response.Write "<td bgcolor='#FFFFFF' style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1' align='center'>" & rs("IDCD") & "</td>"

ma non funziona, sapete aiutarmi? grazie a tutti.

[Francis87]

ok, ma quella variabile bg dove sta nel codice html?

Select Case rs("stato")
  Case "libero"
    bg = "#00ff00"
  Case "occupato"
    bg = "#ff0000"
  Case "disponibile"
    bg = "#ffff00"
End Select

'parte html:
Response.Write "<tr>"
Response.Write "<td style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1; background-color: "&bg&";' align='center'>" & rs("IDCD") & "</td>"

[Enrique_Rojas]

Originariamente inviato da Francis87
ok, ma quella variabile bg dove sta nel codice html?

Select Case rs("stato")
  Case "libero"
    bg = "#00ff00"
  Case "occupato"
    bg = "#ff0000"
  Case "disponibile"
    bg = "#ffff00"
End Select

'parte html:
Response.Write "<tr>"
Response.Write "<td style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1; background-color: "&bg&";' align='center'>" & rs("IDCD") & "</td>"

Ti ringrazio ma le celle rimangono sempre e comunque bianche...

[Certe Notti]

Originariamente inviato da Enrique_Rojas
Ciao vengo dal forum di ASP, dove forse ho sbagliato a postare...
il problema è questo:

-i record del dbase si distinguono perchè un campo della tabella assume valore diverso: libero, occupato, disponibile, standby

-vorrei colorare la riga di ogni singolo record estratto secondo la condizione del campo, cioè se:

-campo=libero la riga di quel record è di colore verde
-campo=occupato la riga di quel record è di colore rosso
-campo=disponibile la riga di quel record è di colore giallo
etc etc, ed ho scritto così:

'parte ASP
Select Case rs("stato")
  Case "libero"
    bg = "green"
  Case "occupato"
    bg = "red"
  Case "disponibile"
    bg = "yellow"
End Select

'parte html:
Response.Write "<tr>"
Response.Write "<td bgcolor='#FFFFFF' style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1' align='center'>" & rs("IDCD") & "</td>"

ma non funziona, sapete aiutarmi? grazie a tutti.

io lo scriverei così:

Select Case rs("stato")
  Case "libero"
    bg = "#00ff00"
  Case "occupato"
    bg = "#ff0000"
  Case "disponibile"
    bg = "#ffff00"
End Select

'parte html:
Response.Write "<tr>"
Response.Write "<td bgcolor=" & bg & "style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1;' align='center'>" & rs("IDCD") & "</td>"

[Enrique_Rojas]

Grazie anche a te, ma così colora tutto di verde, anche i records che dovrebbero essere di altro colore...

[Certe Notti]

Originariamente inviato da Enrique_Rojas
Grazie anche a te, ma così colora tutto di verde, anche i records che dovrebbero essere di altro colore...

allora c'è qualche crisma nella funzione di select...
ma i buni vecchi affidabili if non ti converrebbero?

[Enrique_Rojas]

Originariamente inviato da Certe Notti
allora c'è qualche crisma nella funzione di select...
ma i buni vecchi affidabili if non ti converrebbero?

... sarebbe a dire??? :master: se intendi questo non cambia nulla...

Dim bg

if rs("stato") = sana then
  bg = "#00FF00"
end if

if rs("stato") = allerta then 
  bg = "#FF0000"
end if

if rs("stato") = allarme then
  bg = "#FFFF00"
End if

[Certe Notti]

Originariamente inviato da Enrique_Rojas
... sarebbe a dire??? :master: se intendi questo non cambia nulla...

Dim bg

if rs("stato") = sana then
  bg = "#00FF00"
end if

if rs("stato") = allerta then 
  bg = "#FF0000"
end if

if rs("stato") = allarme then
  bg = "#FFFF00"
End if

Response.Write "<tr>"
If (rs("Stato")="libero") then
 Response.Write "<td bgcolor='#00ff00' style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1;' align='center'>" & rs("IDCD") & "</td>"
end if
If (rs("Stato")="occupato") then
 Response.Write "<td bgcolor='#ff0000' style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1;' align='center'>" & rs("IDCD") & "</td>"
end if
If (rs("Stato")="disponibile") then
 Response.Write "<td bgcolor='#ffff00' style='font-family: Verdana; font-size: 8 pt'; style='border-style: solid; border-width: 1;' align='center'>" & rs("IDCD") & "</td>"
end if

[Enrique_Rojas]

so già che non lo crederai, ma così non estrae più nessun dato... la tabella rimane bianca...

[Certe Notti]

Originariamente inviato da Enrique_Rojas
so già che non lo crederai, ma così non estrae più nessun dato... la tabella rimane bianca...

emh non è che hai combinato qualche altro pastrocchio in giro per la pagina... asp...

no perchè sinceramente il mi ocodice non m isembra sbagliato... quindi qua ci sta di mezzo solo il db che può fare capricci...