Cookies problem

hejsan, har ett forum där jag vill se ifal ett meddelande e postat eller inte, då ett meddelande postas så uppdaterar kolumnen ansers med 1, så här ser min kod för kakan ut:

dim id_number
id_number = rs("id")

If Request.Cookies("KAKA")("number" & cStr(id_number)) = "" Then   ' ### Finns ingen cookie.
response.write "olast"

ElseIf CStr(Request.Cookies("KAKA")("number" & cStr(id_number))) = CStr(rs("answers")) Then
response.write "last"
end if

och på sidan där meddelandena listas:

Response.Cookies("KAKA")("number" & Request.QueryString("id")) = rs("answers")
Response.Cookies("KAKA").Expires = "December 10, 2009"

men problemet är att då jag läst en tråd en gång så fungerar det fint, dvs den skriver ut oläst men när jag sedan ökar på kolumnen ansers med 1 och går tillbaka och kollar på första sidan så skriver den varken ut läst eller oläst??

Är du säker på att jämförelsen i din ElseIf kan fungera? Vad innehåller rs("answers") alltså?

uhh?? d verkar som att den inte fungerar, rs("answers") är en int i databasen, som adderas med ett varje gång ett nytt inlägg postas så adderas den med ett

Är det det talet som lagras i cookien då?
Skriv ut värdena så du vet vad du jämför med.

då jag skriver ut värdet på answers så får jag ett tal, 0,1,2,3 osv beroende på hur många inlägg som har svarats på, och det är ju answers som jag lagrar i cookien via den här raden:

Response.Cookies("KAKA")("number" & Request.QueryString("id")) = rs("answers")

men problemet bordet väl ligga någonstans här:

dim id_number
id_number = rs("id")

If Request.Cookies("KAKA")("number" & cStr(id_number)) = "" Then   ' ### Finns ingen cookie.
response.write "olast"

ElseIf CStr(Request.Cookies("KAKA")("number" & cStr(id_number))) = CStr(rs("answers")) Then
response.write "last"
end if

det löste sig, för de som vill veta:

dim id_number
id_number = rs("id")

If Request.Cookies("KAKA")("number" & cStr(id_number)) = "" Then   ' ### Finns ingen cookie.
response.write "olast"

ElseIf CStr(Request.Cookies("KAKA")("number" & cStr(id_number))) = CStr(rs("answers")) Then
response.write "last"
else
response.write "olast"
end if