For Each Item in Session.Contents
If IsObject( Session.Contents(Item)) Then
Response.Write Item & " is an object.<BR>"
Else
Response.Write Item & "=" & Session.Contents(Item) & "<BR>"
End If
Next
Utifrån detta får du alltså bygga en funktion som kollar vilka värden dom har... dina kriterier...