Convert Unix time to datetime

Unix time

is the number of seconds since the Unix Epoch (January 1 1970 00:00:00 GMT)

$SAMPLECODE$

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15

* Convert Unix time to datetime
FUNCTION UnixTime2Datetime(tnUnixTime)
RETURN {^1970/01/01 00:00:00} + tnUnixTime

* Convert datetime to Unix time
FUNCTION Datetime2UnixTime(ttDT)
RETURN ttDT - {^1970/01/01 00:00:00}

*-----------------------------------------------
* Example
? UnixTime2Datetime(1178296589)
? Datetime2UnixTime(DATETIME())

$SEEALSO$ Convert Excel serial number date to VFP date/a>

Comments