Hola
El problema ha de estar donde dice
JuanRa 
Ha de quedar algo como esto
Código asp:
Ver originalif rs.eof = True or rs.bof = True then
Response.Write "Hoy nadie cumple años"
else
do while not rs.eof
Response.Write rs.Fields("fecha")
rs.movenext
loop
end if
Suerte