Visual Basic - Búsqueda de fecha con independencia del año.

Hola a todos.

Estoy atascado y no sé como continuar, solicito vuestra amable ayuda.

Dispongo de una bd. con un campo de fecha, que indica cuando nació una persona.

Tengo que enviar un mensaje a todas esas personas que cumplan años desde hoy hasta los próximos 15 dias.

¿Como hago para seleccionarlas con independencia del año en que nacieron?

He intentado esto pero no me funciona.

Hoy=date
Mes=Month(hoy)
Dia=Day(hoy)
HoyMas15 = DateAdd("d", 15, Hoy)
Mes2 = Month(HoyMas15)
Dia2 = Day(HoyMas15)

CriterioSQL = "SELECT * FROM FICHA WHERE FNAC BETWEEN (MONTH(Fnac)=" & Mes & " and DAY(Fnac)=" & Dia & ") AND (MONTH(Fnac)=" & Mes2 & " and DAY(Fnac) =" & Dia2


Gracias anticipadas

y la bd. de que tipo es? access, sql, betrieve, dbase, foxpro, velneo....
hay infinidad de bd y cada una tiene su formato de fecha diferente.
i

la base de datos es access.

Provisionalmente lo he solucionado de esta forma, pero imagino que habrá una mas depurada y como mandan los cánones

Fnac contiene la fecha de nacimiento del cliente.

Hoy=date
Mes=Month(Hoy)
HoyMas15 = DateAdd("d", 15, Hoy)
Mes2 = Month(HoyMas15)
Dia2 = Day(HoyMas15)

CriterioSQL = "SELECT * FROM FICHA WHERE MONTH(Fnac)=" & Mes & " and MONTH(Fnac)=" & Mes2

Agrupo los registros que tengan el mes en curso y los posibles del mes siguiente por si la suma de hoy + 15 días implique a mes siguiente. Luego los comparo uno a uno.

Por curiosidad me gustaria saber si existe la forma correcta en mandato SQL.

Gracias por tu atención y un saludo.