Fechas

[yampoo]

Hola.

Como puedo hacer lo siguiente:

Un usuario crea un registro y la fecha de finalización es: "06/03/2003 22.37.26" y nos encontramos actualmente en el día mes y hora "06/01/2003 22.37.26", como hago para mostrar que queda 1 mes, 0 dias, 0 horas...?

Gracias.

[bakanzipp]

puedes usar la funcion DateDiff de vbscript...

DateDiff( intervalo, fecha1, fecha2, [primer_dia_semana, primera_semana_año] )

Función de fechas. Calcula la diferencia entre las dos fechas especificadas y la devuelve expresada en los periodos indicados en el argumento intervalo. Por lo tanto devuelve un resultado numérico. Los posibles intervalos a especificar son los mismos que en el caso anterior.

Los argumentos entre corchetes son opcionales, y establecen cuál se considera primer día de la semana y cuál primera semana del año. Si no se le pasan a la función estos argumentos, por defecto toma el domingo como primer día de la semana y la semana del 1 de enero como primera semana del año.

El argumento primer_dia_semana puede tener los siguientes valores:

constante valor descripción
vbUseSystem 0 usa valores de API de idioma nacional
vbSunday 1 domingo (valor predeterminado)
vbMonday 2 lunes
vbTuesday 3 martes
vbWednesday 4 miércoles
vbThursday 5 jueves
vbFriday 6 viernes
vbSaturday 7 sábado

El argumento primera_semana_año puede tener los siguientes valores:

constante valor descripción
vbUseSystem 0 usa valores de API de idioma nacional (NLS).
vbFirstJan1 1 comienza con la semana del 1 de enero (valor predeterminado).
vbFirstFourDays 2 comienza con la semana con al menos cuatro días en el nuevo año.
vbFirstFullWeek 3 comienza con la primera semana completa del nuevo año.

Dada la naturaleza de la función DateDiff, podríamos usarla por ejemplo para calcular el número de días entre dos fechas o el número de semanas entre hoy y el final del año.

Si fecha 1 hace referencia a un punto en el tiempo posterior a fecha2, la función DateDiff devuelve un número negativo.

Ejemplo:

<%

Function DiffADate(theDate
misDias = "Días a partir de hoy: " & DateDiff("d",Ahora,theDate)
End Function

%>

que nos devuelve como valor de misDias los días entre la fecha actual y la fecha dada.

referencia