Visual FoxPro

Generate ULID

See more ULID/UUID Examples

Generate a ULID using a specified timestamp or the current system date timestamp.

Important: Chilkat's ULID functionality was introduced in v9.5.0.94.

Visual FoxPro

LOCAL loDt
LOCAL lnUtc
LOCAL lcUlid
LOCAL loDt2

loDt = CreateObject('Chilkat.CkDateTime')

*  Set dt to the current system date/time.
loDt.SetFromCurrentSystemTime()

*  Generate a ULID for the current UTC date/time.
*  (i.e. the current UTC UNIX-time)
lnUtc = 1
lcUlid = loDt.UlidGenerate(lnUtc)
? lcUlid

*  example result: 01GRGCH4J88RECEN4D4VK4F629

*  Generate a ULID using the local timezone's current time.
lnUtc = 0
lcUlid = loDt.UlidGenerate(lnUtc)
? lcUlid

*  example result: 01GRH14AA82EY9A7S99YYF2QDY

*  -----------------------------------------------
*  To generate a ULID using a specific UNIX timestamp

*  For example, the Unix timestamp for Sun, 05 Feb 2023 14:57:46 GMT
*  is 1675609066

*  For more information about the Epoch Unix Timestamp, see Epoch Unix Timestamp

*  To generate a ULID from a specified date/time, set the CkDateTime and then generate the ULID.
loDt2 = CreateObject('Chilkat.CkDateTime')
lnUtc = 1
loDt2.SetFromUnixTime(lnUtc,1675609066)
lcUlid = loDt2.UlidGenerate(lnUtc)
? lcUlid

*  example result: 01GRH1AJGG3P5K04DJHN3QJCX3

RELEASE loDt
RELEASE loDt2