alguien me puede ayudar con este codigo?

[malex6]

se que mi error es de gil, pero no puedo hacer que funcione, se trata de me de el santoral de hoy, tengo una bd llamada "santoral" y en ella los honomasticos de todos los dias del año...
pero no me reconoce correctamente el dia en que estamos, por ejemplo hace solo 15 minutos me deberia heber estado entregano "Mario" pero no lo hace en cambio me entrega el primer dato de la base que es "Año Nuevo"... aqui les va el codigo para ver si encuentran mi error

<%
dim conexion
set conexion=server.CreateObject("ADODB.Connectio n")
set tabla=server.CreateObject("ADODB.recordset&qu ot;)
dim temp,fechaActual,fecha

conexion.open "santoral"
tabla.Open "tabla1",conexion
Tabla.open Temp,conexion,2,3,1
if tabla.bof and tabla.eof then
fechaActual=date
fecha=tabla("fecha")
temp="select santoral from tabla1 where fecha=#"& fechaActual &"#"'
tabla.close
end if
%>

y luego solo escribo <%=tabla("santoral")%> para que me entrege el dato en mi pagina


desde ya muchas gracias