VBScript

Example: Http.ClearInMemoryCookies method

Demonstrates how to call the ClearInMemoryCookies method. VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

set http = CreateObject("Chilkat.Http")

' Save received cookies to an in-memory cache.
http.CookieDir = "memory"
http.SaveCookies = 1

' Indicate that saved cookies should be sent on subsequent requests (where the cookie's attributes match the request)
http.SendCookies = 1

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

' Examine the cookies cached for the domain paypal.com
xmlStr = http.GetCookieXml("paypal.com")
outFile.WriteLine(xmlStr)

' Sample output:
' <?xml version="1.0" encoding="utf-8"?>
' <cookies>
'     <cookie key="/,/,$x-enc" v="0" maxAge="1800">
'         <x-enc>URI_ENCODING</x-enc>
'     </cookie>
'     <cookie key=".paypal.com,/,LANG" v="0" expire="Fri, 15 Aug 2025 23:42:44 GMT" maxAge="31556000" secure="yes">
'         <LANG>en_US%3BUS</LANG>
'     </cookie>
'     <cookie key="paypal.com,/,ts" v="0" expire="Mon, 14 Aug 2028 14:56:50 GMT" secure="yes">
'         <ts>vreXpYrS%3D1848964208%26vteXpYrS%3D1755271608%26vr%3Dae3bc3371987669703182e1efffffffe%26vt%3Dae3bc337198369703182e1efffffffd%26vtyp%3Dnew</ts>
'     </cookie>
'     <cookie key="paypal.com,/,ts_c" v="0" expire="Mon, 14 Aug 2028 14:56:50 GMT" secure="yes">
'         <ts_c>vr%3Dae3bc3371987365703182e1efffffffe%26vt%3Dae3bc337198759703182e1efffffffd</ts_c>
'     </cookie>
' </cookies>

' Clear the in-memory cookies.
http.ClearInMemoryCookies 

' The cached cookies should not be present.
xmlStr = http.GetCookieXml("paypal.com")
outFile.WriteLine("After calling ClearInMemoryCookies...")
outFile.WriteLine(xmlStr)
outFile.WriteLine("----")

outFile.Close