problemer med dato - 14 dage

Jeg har lidt problemer med nedenstående.

Jeg har en post med en dato - hvis den dato er mere end 14 dage gammel skal der sket et og er den under 14 dage gammel noget andet og hvis der ikke er nogen dato (blank) noget 3.

Min kode er som følger:

dato14 = DateAdd("d",-14,date)
dato14 = Year(dato14) & "-" & Month(dato14) & "-" & Day(Dato14)

opfoelgning= rs("opfoelgning")

if opfoelgning >= #" & dato14 & "# then

xx

elseif if opfoelgning < #" & dato14 & "# then

xx

else

xx

end if