Classic ASP
Parse a Microsoft JSON Date (MS AJAX Date)

Demonstrates how to parse a Microsoft JSON Date, also known as an MSAJAX date.
Chilkat Classic ASP Downloads

Classic ASP
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

' Parse Microsoft JSON Dates (AJAX Dates)
set json = Server.CreateObject("Chilkat.JsonObject")

success = json.Load("{ ""AchievementDate"":""/Date(1540229468330-0500)/""}")

set dt = Server.CreateObject("Chilkat.CkDateTime")
success = json.DateOf("AchievementDate",dt)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( "Unable to parse a date/time.") & "</pre>"
    Response.End
End If

' Show the date in different formats:
bLocal = 1
Response.Write "<pre>" & Server.HTMLEncode( "RFC822: " & dt.GetAsRfc822(bLocal)) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "Timestamp: " & dt.GetAsTimestamp(bLocal)) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "YYYY-MM-DD: " & dt.GetAsIso8601("YYYY-MM-DD",bLocal)) & "</pre>"

' Get integer values for year, month, day, etc.
set dtObj = Server.CreateObject("Chilkat.DtObj")
dt.ToDtObj bLocal,dtObj

Response.Write "<pre>" & Server.HTMLEncode( "year: " & dtObj.Year) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "month: " & dtObj.Month) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "day: " & dtObj.Day) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "hour: " & dtObj.Hour) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "minute: " & dtObj.Minute) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "seconds: " & dtObj.Second) & "</pre>"

' Sample output:
' RFC822: Mon, 22 Oct 2018 17:31:08 -0500
' Timestamp: 2018-10-22T17:31:08-05:00
' YYYY-MM-DD: 2018-10-22
' year: 2018
' month: 10
' day: 22
' hour: 17
' minute: 31
' seconds: 8

%>
</body>
</html>