differenza tra 2 date [presa da database]

[benete]

oggi = date()

'registrato da un giorno
if iscrizione = 0 then sql = sql & "AND dataregistrazione = '" & oggi & "' "

'registrato entro una settimana
if iscrizione = 1 then
set rssss = server.createObject("ADODB.recordset")
rssss.open sql,StrSql
if not rssss.eof then
datareg=rssss.fields("dataregistrazione")
end if
rsss.close
sql = sql & "WHERE dataregistrazione = '" & datediff(m,datareg,oggi)<=7 & "' "

End If


mmmm... c'è qualche errorino vero ???