Unix timestamp en ASP clásico (vbscript)

¿Qué es Unix timestamp?

El Unix timestamp es una representación numérica del tiempo que se utiliza ampliamente en sistemas operativos Unix y en muchos lenguajes de programación. Es el número de segundos transcurridos desde el 1 de enero de 1970 a las 00:00:00 (medianoche) en la zona horaria UTC (Tiempo Universal Coordinado). También se le conoce como Epoch time o POSIX time.

Ventajas de Unix timestamp

Una de las ventajas del Unix timestamp es que es un valor numérico simple y compacto que representa una fecha y hora específica de forma universal, independiente de la zona horaria o el formato de fecha local. Esto lo hace especialmente útil en aplicaciones y sistemas que necesitan realizar cálculos de tiempo, comparaciones y conversiones de forma eficiente y precisa.

Unix timestamp en ASP clásico

En el código proporcionado, se presentan dos funciones en VBScript para convertir entre una cadena de fecha y hora en formato "YYYY-MM-DD HH:MM:SS" y un Unix timestamp.

La función "ConvertToUnixTimeStamp" toma una cadena de fecha y hora como entrada y utiliza la función "CDate" para convertirla en un valor de fecha y hora reconocible por VBScript. Luego, utiliza la función "DateDiff" para calcular la diferencia en segundos entre la fecha y hora de entrada y la fecha y hora de referencia "01/01/1970 00:00:00". El resultado se convierte a una cadena de texto con la función "CStr" y se devuelve como el Unix timestamp.

La función "ConvertUnixTimeStampToDateTime" toma un valor de Unix timestamp como entrada y utiliza la función "DateAdd" para sumar los segundos del timestamp a la fecha y hora de referencia "01/01/1970 00:00:00", obteniendo así la fecha y hora correspondiente en formato de fecha regular. El resultado se devuelve como una cadena de texto.

Estas funciones son útiles cuando se trabaja con fechas y horas en aplicaciones o sistemas que utilizan VBScript o Classic ASP, y se necesitan convertir entre el formato de fecha y hora regular y el Unix timestamp.

Para convertir un valor de cadena de fecha y hora en formato "YYYY-MM-DD HH:MM:SS" a un Unix timestamp (los segundos desde el 01/01/1970 hasta la fecha y hora de entrada), se puede utilizar una función de conversión como la siguiente:

Function ConvertToUnixTimeStamp(input_datetime) 'As String 
  Dim d
  d = CDate(input_datetime) 
  ConvertToUnixTimeStamp = CStr(DateDiff("s", "01/01/1970 00:00:00", d)) 
End Function

Luego, para obtener la fecha y hora a partir del Unix timestamp, utiliza el siguiente código:

Function ConvertUnixTimeStampToDateTime(input_unix_timestamp) 'As String [regular datetime] 
  ConvertUnixTimeStampToDateTime = CStr(DateAdd("s", input_unix_timestamp, "01/01/1970 00:00:00")) 
End Function