|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Visual FoxPro) JSON Date ParsingDemonstrates how to parse date/time strings from JSON. Note: This example uses the DtOf and DateOf methods introduced in Chilkat v9.5.0.73
LOCAL lnSuccess LOCAL loJson LOCAL loDateTime LOCAL loDt LOCAL lnGetAsLocal * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject') loJson = CreateObject('Chilkat.JsonObject') loJson.EmitCompact = 0 * First, let's create JSON containing some date/time strings. loJson.UpdateString("test.timestamp","2018-01-30T20:35:00Z") loJson.UpdateString("test.rfc822","Tue, 24 Apr 2018 08:47:03 -0500") loJson.UpdateString("test.dateStrings[0]","2018-01-30T20:35:00Z") loJson.UpdateString("test.dateStrings[1]","Tue, 24 Apr 2018 08:47:03 -0500") loJson.UpdateNumber("test.StartLoggingTime","1446834998.695") loJson.UpdateNumber("test.Expiration","1442877512.0") loJson.UpdateInt("test.StartTime",1518867432) ? loJson.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. * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.CkDateTime') loDateTime = CreateObject('Chilkat.CkDateTime') * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.DtObj') loDt = CreateObject('Chilkat.DtObj') lnGetAsLocal = 0 * Load the date/time at test.timestamp into the dateTime object. lnSuccess = loJson.DateOf("test.timestamp",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) ? STR(loDateTime.GetAsUnixTime(0)) ? loDateTime.GetAsRfc822(lnGetAsLocal) lnSuccess = loJson.DateOf("test.rfc822",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) loJson.I = 0 lnSuccess = loJson.DateOf("test.dateStrings[i]",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) loJson.I = 1 lnSuccess = loJson.DateOf("test.dateStrings[i]",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) lnSuccess = loJson.DateOf("test.StartLoggingTime",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) lnSuccess = loJson.DateOf("test.Expiration",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) lnSuccess = loJson.DateOf("test.StartTime",loDateTime) ? loDateTime.GetAsTimestamp(lnGetAsLocal) * 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: lnSuccess = loJson.DtOf("test.timestamp",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.Minute) lnSuccess = loJson.DtOf("test.rfc822",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.Minute) loJson.I = 0 lnSuccess = loJson.DtOf("test.dateStrings[i]",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.Minute) loJson.I = 1 lnSuccess = loJson.DtOf("test.dateStrings[i]",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.Minute) lnSuccess = loJson.DtOf("test.StartLoggingTime",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.Minute) lnSuccess = loJson.DtOf("test.Expiration",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.Minute) lnSuccess = loJson.DtOf("test.StartTime",lnGetAsLocal,loDt) ? "month=" + STR(loDt.Month) + ", day=" + STR(loDt.Day) + ", year=" + STR(loDt.Year) + ", hour=" + STR(loDt.Hour) + ", minute=" + STR(loDt.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 RELEASE loJson RELEASE loDateTime RELEASE loDt |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.