---

Kan noen finne en feil i denne koden ?

Her trekker jeg ut data fra en database,
sjekker hver record og trekker ut en substring på hver linje som
jeg konverterer til integer og sammenligner med dagens
dato og klokkeslett som er lagret i variablene "hh" og "dd"....

if setningen som jeg har problemer med er
"if (sendtdag = dd) and (sendttid < hh) then" ' dd = dagens dato -1
.... denne gir meg grønn bakgrunnsfarge på utskriften i stedet for
gul ...som i følge mine beregninger bør være riktig ....

Dersom sendtdag (som har verdien 7) er lik eller mindre enn dagens dato (som
har verdien 8) og
sendttid (som har verdien 20) er mindre enn klokken 21 dagen før så skal
bakgrunnsfargen
være gul .

Er det noen som forstår ?

Morten

While not data.EOF
sendtdag = cint(mid(data("time_received"), 1,2))
sendttid = cint(mid(data("time_received"), 12, 2))
if (sendtdag = dd) and (sendttid < hh) then
bgcolor = "yellow"
elseif sendtdag < dd then
bgcolor = "red"
else
bgcolor = "lightgreen"
end if
Response.Write "<tr>"
Response.Write "<td bgcolor=white>" & sendtdag & ", " & sendttid & ", " &
bgcolor & "</td>"
Response.Write "<td bgcolor=" & bgcolor & ">" & data("user_name") &
"</td>"
Response.Write "<td bgcolor=" & bgcolor & " align=center>" &
data("time_received") & "</td>"
Response.Write "<td bgcolor=" & bgcolor & " align=center>" &
data("time_sent") & "</td>"
Response.Write "</tr>"
data.MoveNext
Wend

---

On Thu, 8 Feb 2001 14:30:12 +0100, "dizl" <morten.bekkelund@varner.no>
wrote:

>if setningen som jeg har problemer med er
>"if (sendtdag = dd) and (sendttid < hh) then" ' dd = dagens dato -1
>... denne gir meg grønn bakgrunnsfarge på utskriften i stedet for
>gul ...som i følge mine beregninger bør være riktig ....
>
>Dersom sendtdag (som har verdien 7) er lik eller mindre enn dagens dato (som
>har verdien 8) og
>sendttid (som har verdien 20) er mindre enn klokken 21 dagen før så skal
>bakgrunnsfargen
>være gul .

Så vidt jeg kan se af din kode, så får du kun gul baggrundsfarve hvis
"sendtdag" er LIG MED "dd" (og sendttid er mindre end hh). Hvis det er
det, der er problemet, så skal din kode vel være
"if (sendtdag <= dd) and (sendttid < hh) then" og ikke
"if (sendtdag = dd) and (sendttid < hh) then"

Det er muligt at det er "=<" i stedet for "<=" (det kan jeg aldrig
huske

Din elseif-kode:

elseif sendtdag < dd then
bgcolor = "red"

er jo opfyldt så fremt sendttid er større end eller lig med hh.

Da sendtdag=7 < dd=8 vil du, som din kode ser ud nu, ende i din
"else"-statement og dermed få grøn baggrund.

/Lars