Classic ASP
Classic ASP
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
Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
set json = Server.CreateObject("Chilkat.JsonObject")
json.EmitCompact = 0
' 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)
Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"
' 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.
set dateTime = Server.CreateObject("Chilkat.CkDateTime")
set dt = Server.CreateObject("Chilkat.DtObj")
getAsLocal = 0
' Load the date/time at test.timestamp into the dateTime object.
success = json.DateOf("test.timestamp",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsUnixTime(0)) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsRfc822(getAsLocal)) & "</pre>"
success = json.DateOf("test.rfc822",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
json.I = 0
success = json.DateOf("test.dateStrings[i]",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
json.I = 1
success = json.DateOf("test.dateStrings[i]",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
success = json.DateOf("test.StartLoggingTime",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
success = json.DateOf("test.Expiration",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
success = json.DateOf("test.StartTime",dateTime)
Response.Write "<pre>" & Server.HTMLEncode( dateTime.GetAsTimestamp(getAsLocal)) & "</pre>"
' 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)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
success = json.DtOf("test.rfc822",getAsLocal,dt)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
json.I = 0
success = json.DtOf("test.dateStrings[i]",getAsLocal,dt)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
json.I = 1
success = json.DtOf("test.dateStrings[i]",getAsLocal,dt)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
success = json.DtOf("test.StartLoggingTime",getAsLocal,dt)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
success = json.DtOf("test.Expiration",getAsLocal,dt)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
success = json.DtOf("test.StartTime",getAsLocal,dt)
Response.Write "<pre>" & Server.HTMLEncode( "month=" & dt.Month & ", day=" & dt.Day & ", year=" & dt.Year _
& ", hour=" & dt.Hour & ", minute=" & dt.Minute) & "</pre>"
' 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
%>
</body>
</html>