Adding Cookies to an HTTP GET Request

Example showing how to add one or more cookies to an HTTP GET request.

Download Chilkat .NET for 2.0 Framework

Download Chilkat .NET for 1.0 / 1.1 Framework

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
    MsgBox(http.LastErrorText)
    Exit Sub
End If


'  The Cookie header field has this format:
'  Cookie: name1=value1 [; name2=value2] ...

'  Build an HTTP GET request:
Dim request As New Chilkat.HttpRequest()
request.SetFromUrl("http://www.example-code.com/")
request.UseGet()

'  Add two cookies:
request.AddHeader("Cookie","user=""mary""; city=""Chicago""")

'  Send the HTTP GET.  The cookies are sent as part of the HTTP header.
Dim response As Chilkat.HttpResponse
Dim domain As String
domain = "www.example-code.com"
Dim port As Long
port = 80
Dim ssl As Boolean
ssl = false
response = http.SynchronousRequest(domain,port,ssl,request)
If (response Is Nothing ) Then
    MsgBox(http.LastErrorText)
    Exit Sub
End If


'  Display the HTML body of the response.
If (response.StatusCode = 200) Then
    TextBox1.Text = TextBox1.Text & response.BodyStr & vbCrLf
Else
    TextBox1.Text = TextBox1.Text & "HTTP Response Status = " _
         & response.StatusCode & vbCrLf
End If