(Classic ASP) Example: Http.SetCookieXml method

Demonstrates the SetCookieXml method.

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>
<%
success = 0

set http = Server.CreateObject("Chilkat.Http")

http.SaveCookies = 1
http.CookieDir = "c:/temp/cookie_cache"
' For this initial request, we are not sending cookies.
' We are starting a new (cookie) session and saving the cookies we receive.
http.SendCookies = 0

' Do a request that establishes and saves cookies in files in the cookie directory.
html = http.QuickGetStr("https://google.com/")

' Examine the LastResponseHeader to see the cookies that were received:
Response.Write "<pre>" & Server.HTMLEncode( http.LastResponseHeader) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "----------------------------------") & "</pre>"

' We can see the following Set-Cookie response header fields:

' Set-Cookie: AEC=AVh_V2h-fsL2-****; expires=Mon, 23-Feb-2026 19:15:10 GMT; path=/; domain=.google.com; Secure; HttpOnly; SameSite=lax
' Set-Cookie: NID=525=XC_cL****Hn7-WONX; expires=Thu, 26-Feb-2026 19:15:10 GMT; path=/; domain=.google.com; HttpOnly

' The following file was created:  c:/temp/cookie_cache/google_com.xml

' Examine the cookies received in the above request.
Response.Write "<pre>" & Server.HTMLEncode( http.GetCookieXml("google.com")) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "----------------------------------") & "</pre>"

' Sample output.

' <?xml version="1.0" encoding="utf-8"?>
' <cookies>
'     <cookie key=".google.com,/,AEC" v="0" expire="Mon, 23-Feb-2026 19:05:20 GMT" secure="yes">
'         <AEC>AVh_V2gL8QzTdFGYq6_rS6ktBfqm8WNG3pzHxS2nTZD5i23dRBau2c4ZRA</AEC>
'     </cookie>
'     <cookie key=".google.com,/,NID" v="0" expire="Thu, 26-Feb-2026 19:05:20 GMT">
'         <NID>525=SuLcnaSkFqF4Jz_jLEq4kt_f3MY2Xro1VDoVzLKvp8XHcW2UHuLKJSr55iDeW0NiRIPXoAwJWF1-YNl29unX2xfhEWsS5BhbuK_2DXdD9cTOmn5BSENMhZasxeJ71mEP2PQRMXBndqnl41DhblC2jjdac_so4TESIll1B0GCVe9wRFjqI6DTZItRCj61BHmr1_RAQi0_jrh_ihn6KYtIFEY7</NID>
'     </cookie>
' </cookies>

' -------------------------------------------------------------------------------------------
' Let's say we want to continue with the session at some later time with a new HTTP object.
' One way to do it is to simply set the same cookie properties:
set httpB = Server.CreateObject("Chilkat.Http")

httpB.SaveCookies = 1
httpB.CookieDir = "c:/temp/cookie_cache"
httpB.SendCookies = 1

' The cookies from the cache are sent.
html = httpB.QuickGetStr("https://google.com/")

' Examine the LastHeader to see the contents of the Cookie header field.
Response.Write "<pre>" & Server.HTMLEncode( httpB.LastHeader) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "----------------------------------") & "</pre>"

' -------------------------------------------------------------------------------------------
' Another way to do it is to explicitly load the cookies from XML
' and set the cookies for the particular domain.

set httpC = Server.CreateObject("Chilkat.Http")

httpC.SaveCookies = 1
' Do not save cookies to files, just keep them in memory.
httpC.CookieDir = "memory"
httpC.SendCookies = 1

set sbCookiesXml = Server.CreateObject("Chilkat.StringBuilder")
success = sbCookiesXml.LoadFile("c:/temp/cookie_cache/google_com.xml","utf-8")
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( sbCookiesXml.LastErrorText) & "</pre>"
    Response.End
End If

success = httpC.SetCookieXml("google.com",sbCookiesXml.GetAsString())
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( httpC.LastErrorText) & "</pre>"
    Response.End
End If

html = httpC.QuickGetStr("https://google.com/")

' Examine the LastHeader to see the contents of the Cookie header field.
Response.Write "<pre>" & Server.HTMLEncode( httpC.LastHeader) & "</pre>"

%>
</body>
</html>