Examine HTTP Request and Response Headers

Demonstrates how to examine the HTTP request and response headers after doing an HTTP GET (also works for POST, PUT, DELETE, etc.)

Download: Chilkat .NET Assemblies

Dim http As New Chilkat.Http()

Dim success As Boolean

'  Any string unlocks the component for the 1st 30-days.
success = http.UnlockComponent("Anything for 30-day trial")
If (success <> true) Then
    TextBox1.Text = TextBox1.Text & http.LastErrorText & vbCrLf
    Exit Sub
End If


'  Send the HTTP GET and return the content in a string.
'  (cknotes.com is the Chilkat blog.)
Dim html As String
html = http.QuickGetStr("http://www.cknotes.com/")
If (html = vbNullString ) Then
    TextBox1.Text = TextBox1.Text & http.LastErrorText & vbCrLf
    Exit Sub
End If


'  This example is about examining the request/response headers, so we're ignoring the html received...

'  Show the HTTP request header:
TextBox1.Text = TextBox1.Text & http.LastHeader & vbCrLf

'  Show the HTTP response header:
TextBox1.Text = TextBox1.Text & http.LastResponseHeader & vbCrLf