VB.NET

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. VB.NET

Dim http As New Chilkat.Http

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

' Examine the response status code.
Debug.WriteLine("response status code: " & http.LastStatus)

' Examine the response status text
Debug.WriteLine("response status text: " & http.LastStatusText)

' Examine the full response header.
Debug.WriteLine("response header:")
Debug.WriteLine(http.LastResponseHeader)
Debug.WriteLine("----")

' Examine the response content-type
Debug.WriteLine("LastContentType = " & http.LastContentType)

' Examine the response last-mod date
Debug.WriteLine("LastModDate = " & http.LastModDate)

' Load the response header into a Chilkat MIME object to access its fields individually.
Dim mime As New Chilkat.Mime
mime.LoadMime(http.LastResponseHeader)

Dim numHeaders As Integer = mime.NumHeaderFields
Dim i As Integer = 0
Debug.WriteLine("---- MIME Headers ----")
While i < numHeaders
    Debug.WriteLine("name:  " & mime.GetHeaderFieldName(i))
    Debug.WriteLine("value: " & mime.GetHeaderFieldValue(i))
    i = i + 1
End While
Debug.WriteLine("----")

' Get a header field value by name:
Debug.WriteLine("ETag: " & mime.GetHeaderField("ETag"))


' 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"