Ver Mensaje Individual
  #3 (permalink)  
Antiguo 14/01/2011, 13:51
betamaxtelecom
(Desactivado)
 
Fecha de Ingreso: diciembre-2010
Mensajes: 6
Antigüedad: 14 años
Puntos: 0
Busqueda Respuesta: Sistema de cumpleaños Intranet

Cita:
Iniciado por amendoza Ver Mensaje
Hola betamaxtelecom,

Verifica por medio de response.write las variable que estas comparando que esten en el mismo formato, te recomiendo tambien que trabajes con formatos Fecha, usa la funcion CDate(tuVariable)

Saludos
Cordial saludo gracias a todos les dejo el script para el sistema de cumpleaños basado en asp clasico

'creamos el objeto base de datos
set conn =Server.CreateObject ("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
'abrimos la base de datos
conn.Open (Server.MapPath("/empleados/db/eventos.mdb"))
'creamos el objeto tabla
set rs =Server.CreateObject("ADODB.recordset")
'response.write ("conexion Exitosa")

datFecha=Date()
if Day(datFecha) < 10 then
strDia = "0" & CStr(Day(datFecha))
else
strDia = CStr(Day(datFecha))
end if
if month(datfecha) < 10 then
strMes="0" & CStr(month(datFecha))
else
strMes = CStr(Month(datFecha))
end if
strAnyo= CStr(year(datFecha))
strFecha = strDia & "/" & strMes & "/" & strAnyo

'response.write (strfecha)

rs.Open "SELECT ced, nombre, cargo, foto, estado, Direccion, Extension, cumpleanos FROM usuarios where MONTH(cumpleanos)=MONTH(date())and DAY(cumpleanos)=day(date())and estado= 'Vigente' ", conn


Gracias