Geburtstag = Trim(rstemp.Fields("Geburtstag")) 
if Geburtstag > DateAdd("Yyyy", -18, Date()) then 

So hast du in Geburtstag einen String, mach daraus:

Geburtstag = cDate(rstemp.Fields("Geburtstag")) 
if Geburtstag > DateAdd("Yyyy", -18, Date()) then


Gru�, Andreas
http://me.knows.it

| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an