oppure dato che a me usare <= e >= dava problemi
prelevi tutti i dati e poi li pubblichi dopo verifica

if DateDiff("d",rs("dal"), date())>0 AND DateDiff("d",rs("al"),date())<0 then

io uso DateDiff