Array fungerer ikke helt korrekt.

Dim ids, arrIds

ids = "" & session("fundet") & ""

arrIds = Split(ids,", ")

For t = LBound(arrIds) to UBound(arrIds)
    if rs("id") = arrIds(t) then
    response.write "Har tidligere været der."
    else
    response.write "ny"
    end if
next

Nogen der ved hvorfor jeg ikke kan få det til at virke..