cumpleaños

[banrey]

Muchachos listo muchisimas gracias por la ayuda brindada, anexo el codigo para que otras personas que tengan el mismo requerimiento que yo puedan consultarlo....

fechactual = Date()
dia = Day(fechactual)
mes = Month(fechactual)
sql= "Select Empleado.Nombre, from Empleado where day(Fch_Nacimiento)='"&dia&"' and month(Fch_Nacimiento)='"&mes&"'"
rs1.Open sql,oConn1
while not rs1.eof
Response.Write("<font face=Arial size=1>" &rs1.Fields("Nombre")& "</font>")
rs1.movenext
wend
rs1.close

una ultima consulta muchacho en mi tabla yo tengo el Email de estos usuario como haria yo para que cuando me muestre la persona que cumple años hoy las personas puedan hacer click sobre su nombre y les redirecciones al Outlook, para que puedan felicitar a esta persona???