DateDiff, hvordan ?

Mig og Datediff har aldrig haft en god kemi, derfor søger jeg lidt hjælp.

Har et udtræk der ser sådan her ud:

Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database.mdb")
Set rs_BE = Server.CreateObject("ADODB.Recordset")
sql_BE = "select * from besog where B_besogt = 'Nej' AND B_saelger='" & session("user") & "' order by B_besogdato "
rs_BE.open sql_BE, conn, 1, 3

<%
Do While Not rs_BE.EOF
%>
<div><%=rs_BE("B_besogdato")%></div>
<%
rs_BE.MoveNext
Loop
%>

B_besogdato formateres således: DD-MM-ÅÅÅÅ

B_besogdato har jeg følgende datoer i tabellen:
18-04-2004
20-04-2004

og i dag har vi så 19-04-2004

Det jeg gerne vil, er at jeg vil kun have udskrevet poster fra min database hvor B_besogdato er foran datoen vi har nu, samt poster der ligger 14 dage tilbage..
De poster der er 14 dage gamle vil jeg have markeret med en farve.
Men poster der ligger mere end 15 dage tilbage vil jeg ikke have udskrevet..

Nogen som kan hjælpe mig hvordan jeg klarer det.. ?