(Excel) Caching cookies in-memory.

Caching cookies in-memory. To automatically save cookies to an in-memory cache, set the CookieDir property equal to the keyword "memory". Also, set the SaveCookies property = True. If the SendCookies property = True, then any cached cookies are automatically re-sent with subsequent GETs and POSTs.

Download Excel Class Modules Chilkat Excel Class Modules

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim http As Chilkat.Http
Set http = Chilkat.NewHttp

' To save cookies to an in-memory cache, set the
' CookieDir equal to "memory".  Also,
' set the SaveCookies property:
http.CookieDir = "memory"
http.SaveCookies = True

' To cause cached cookies to be sent with 
' subsequent HTTP requests, set the SendCookies
' property = True.
http.SendCookies = True

' Any methods that do a GET, POST, etc. will save 
' cookies to the CookieDir (which in this case is an 
' in-memory cache.

html = http.QuickGetStr("https://www.paypal.com/")

' To fetch the XML cookie(s) for a domain, call GetCookieXml:

xmlStr = http.GetCookieXml("paypal.com")

Debug.Print xmlStr

' It's content will look something like this:

' <cookies>
'     <cookie key=".paypal.com,/" v="0" secure="yes">
'         <navcmd>_home-general</navcmd>
'         <HttpOnly />
'         <cwrClyrK4LoCV1fydGbAxiNL6iG>9cz...</cwrClyrK4LoCV1fydGbAxiNL6iG>
'     </cookie>
' </cookies>

' If another HTTP request is sent, the cookies should
' be added:
html = http.QuickGetStr("https://www.paypal.com/")

' Check the LastHeader property to see the MIME header
' of the last HTTP request sent.
' The "Cookie" header field should be present.
Debug.Print "--- LastHeader ---"
Debug.Print http.LastHeader