(Classic ASP) Query NTP Server for Current Date/Time

Demonstrates how to query an NTP server to get the current date/time.

Note: This feature was added in Chilkat v9.5.0.96.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' Specify the NTP server domain.
' Information is passed in a JSON object to allow for any unanticipated future optional information that might need to be provided.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set json = Server.CreateObject("Chilkat.JsonObject")
success = json.UpdateString("ntp_server","pool.ntp.org")

' Query the NTP server for the current date/time.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.CkDateTime")
set dt = Server.CreateObject("Chilkat.CkDateTime")
' Note: The SetFromNtpServer method is available starting in v9.5.0.96 for most Chilkat builds, but not all.
' If the SetFromNtpServer method is not present, contact support@chilkatsoft.com for a hotfix build.
' It should be available in all programming languages/platforms starting in v9.5.0.97
success = dt.SetFromNtpServer(json.Emit())
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( dt.LastErrorText) & "</pre>"
    Response.End
End If

' Show the date/time in various formats..
bLocalTime = 1
Response.Write "<pre>" & Server.HTMLEncode( dt.GetAsTimestamp(bLocalTime)) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( dt.GetAsRfc822(bLocalTime)) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( dt.GetAsUnixTime(bLocalTime)) & "</pre>"

' Sample output:

' 2023-10-31T09:43:27-05:00
' Tue, 31 Oct 2023 09:43:27 -0500
' 1698745407

%>
</body>
</html>