Xojo Plugin

JSON Date Parsing

See more JSON Examples

Demonstrates how to parse date/time strings from JSON.

Note: This example uses the DtOf and DateOf methods introduced in Chilkat v9.5.0.73

Xojo Plugin

Dim success As Boolean
success = False

Dim json As New Chilkat.JsonObject
json.EmitCompact = False

// First, let's create JSON containing some date/time strings.
success = json.UpdateString("test.timestamp","2018-01-30T20:35:00Z")
success = json.UpdateString("test.rfc822","Tue, 24 Apr 2018 08:47:03 -0500")
success = json.UpdateString("test.dateStrings[0]","2018-01-30T20:35:00Z")
success = json.UpdateString("test.dateStrings[1]","Tue, 24 Apr 2018 08:47:03 -0500")
success = json.UpdateNumber("test.StartLoggingTime","1446834998.695")
success = json.UpdateNumber("test.Expiration","1442877512.0")
success = json.UpdateInt("test.StartTime",1518867432)

System.DebugLog(json.Emit())

// We've built the following JSON:

// {
//   "test": {
//     "timestamp": "2018-01-30T20:35:00Z",
//     "rfc822": "Tue, 24 Apr 2018 08:47:03 -0500",
//     "dateStrings": [
//       "2018-01-30T20:35:00Z",
//       "Tue, 24 Apr 2018 08:47:03 -0500"
//     ],
//     "StartLoggingTime": 1446834998.695,
//     "Expiration": 1442877512.0,
//     "StartTime": 1518867432
//   }
// }

// Use the DateOf and DtOf methods to load Chilkat date/time objects with the date/time values.
// The CkDateTime object is primarily for loading a date/time from numerous formats, and then getting
// the date/time in various formats.  Thus, it's primarly for date/time format conversion.
// The DtObj object holds a date/time where the individual components (day, month, year, hour, minutes, etc.) are 
// immediately accessible as integers.
Dim dateTime As New Chilkat.CkDateTime
Dim dt As New Chilkat.DtObj
Dim getAsLocal As Boolean
getAsLocal = False

// Load the date/time at test.timestamp into the dateTime object.
success = json.DateOf("test.timestamp",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))
System.DebugLog(Str(dateTime.GetAsUnixTime(False)))
System.DebugLog(dateTime.GetAsRfc822(getAsLocal))

success = json.DateOf("test.rfc822",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))

json.I = 0
success = json.DateOf("test.dateStrings[i]",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))

json.I = 1
success = json.DateOf("test.dateStrings[i]",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))

success = json.DateOf("test.StartLoggingTime",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))

success = json.DateOf("test.Expiration",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))

success = json.DateOf("test.StartTime",dateTime)
System.DebugLog(dateTime.GetAsTimestamp(getAsLocal))

// Output so far:

// 	2018-01-30T20:35:00Z
// 	1517344500
// 	Tue, 30 Jan 2018 20:35:00 GMT
// 	2018-04-24T13:47:03Z
// 	2018-01-30T20:35:00Z
// 	2018-04-24T13:47:03Z
// 	2015-11-07T00:36:38Z
// 	2015-09-22T04:18:32Z
// 	2018-02-17T17:37:12Z

// Now load the date/time strings into the dt object:
success = json.DtOf("test.timestamp",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

success = json.DtOf("test.rfc822",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

json.I = 0
success = json.DtOf("test.dateStrings[i]",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

json.I = 1
success = json.DtOf("test.dateStrings[i]",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

success = json.DtOf("test.StartLoggingTime",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

success = json.DtOf("test.Expiration",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

success = json.DtOf("test.StartTime",getAsLocal,dt)
System.DebugLog("month=" + Str(dt.Month) + ", day=" + Str(dt.Day) + ", year=" + Str(dt.Year) + ", hour=" + Str(dt.Hour) _
     + ", minute=" + Str(dt.Minute))

// Output:

// month=1, day=30, year=2018, hour=20, minute=35
// month=4, day=24, year=2018, hour=13, minute=47
// month=1, day=30, year=2018, hour=20, minute=35
// month=4, day=24, year=2018, hour=13, minute=47
// month=11, day=6, year=2015, hour=18, minute=36
// month=9, day=21, year=2015, hour=23, minute=18
// month=2, day=17, year=2018, hour=11, minute=37