
25/04/2005, 10:15
|
| | Fecha de Ingreso: mayo-2004
Mensajes: 183
Antigüedad: 21 años Puntos: 0 | |
Muchas Gracias, Muzztein, por tu respuesta.
Ya encontre el codigo que soluciona mi problema.
date1 = Now()
date2 = "14/06/1980"
Yr = DateDiff("YYYY" , date2 , date1)
Mt = DateDiff("m" , date2 , date1)
if Mt < 12*Yr then Yr = Yr - 1
Response.Write("Año: " & Yr) |