
05/12/2005, 09:57
|
| | Fecha de Ingreso: noviembre-2005
Mensajes: 658
Antigüedad: 19 años, 6 meses Puntos: 3 | |
para sacar la diferencia de dias que faltan para un cumpleaños prueba usando esto
dim fec1
fecha_actual = Now()
fec1 = Year(now())
if Cint(Nac_mes) < month(now()) then
fec1 = fec1 + 1
end if
fecha_cumple = CDate(Nac_dia&"/"&Nac_mes&"/"&fec1)
dias_restantes = abs(DateDiff ("d", fecha_cumple,fecha_actual))
response.write dias_restantes |