(Classic ASP) HTTP Response Inspection

See more HTTP Examples

Demonstrates how to inspect the HTTP response, including the status code, status text, and response headers, for Chilkat methods that don't use an HttpResponse object.

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>
<%
set http = Server.CreateObject("Chilkat.Http")

' Returns the contents of the response body.
jsonText = http.QuickGetStr("https://chilkatsoft.com/helloWorld.json")

' Examine the response status code.
Response.Write "<pre>" & Server.HTMLEncode( "response status code: " & http.LastStatus) & "</pre>"

' Examine the response status text
Response.Write "<pre>" & Server.HTMLEncode( "response status text: " & http.LastStatusText) & "</pre>"

' Examine the full response header.
Response.Write "<pre>" & Server.HTMLEncode( "response header:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( http.LastResponseHeader) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>"

' Examine the response content-type
Response.Write "<pre>" & Server.HTMLEncode( "LastContentType = " & http.LastContentType) & "</pre>"

' Examine the response last-mod date
Response.Write "<pre>" & Server.HTMLEncode( "LastModDate = " & http.LastModDate) & "</pre>"

' Load the response header into a Chilkat MIME object to access its fields individually.
set mime = Server.CreateObject("Chilkat.Mime")
success = mime.LoadMime(http.LastResponseHeader)

numHeaders = mime.NumHeaderFields
i = 0
Response.Write "<pre>" & Server.HTMLEncode( "---- MIME Headers ----") & "</pre>"
Do While i < numHeaders
    Response.Write "<pre>" & Server.HTMLEncode( "name:  " & mime.GetHeaderFieldName(i)) & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( "value: " & mime.GetHeaderFieldValue(i)) & "</pre>"
    i = i + 1
Loop
Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>"

' Get a header field value by name:
Response.Write "<pre>" & Server.HTMLEncode( "ETag: " & mime.GetHeaderField("ETag")) & "</pre>"

' Output:

' response status code: 200
' response status text: OK
' response header:
' Content-Type: application/json
' Last-Modified: Sun, 20 Aug 2023 11:36:27 GMT
' Accept-Ranges: bytes
' ETag: "34c27f8e5ad3d91:0"
' Server: Microsoft-IIS/10.0
' X-Powered-By: ASP.NET
' Date: Sat, 30 Aug 2025 14:38:13 GMT
' Content-Length: 22
' ----
' LastContentType = application/json
' LastModDate = 2023-08-20
' ---- MIME Headers ----
' name:  Content-Type
' value: application/json
' name:  Last-Modified
' value: Sun, 20 Aug 2023 11:36:27 GMT
' name:  Accept-Ranges
' value: bytes
' name:  ETag
' value: "34c27f8e5ad3d91:0"
' name:  Server
' value: Microsoft-IIS/10.0
' name:  X-Powered-By
' value: ASP.NET
' name:  Date
' value: Sat, 30 Aug 2025 14:38:13 GMT
' name:  Content-Length
' value: 22
' ----
' ETag: "34c27f8e5ad3d91:0"

%>
</body>
</html>