VBScript Requires Chilkat v11.2.0+

Replace or Remove Default HTTP Headers

See more HTTP Examples

Shows how to replace or remove default HTTP headers.

Also see: Chilkat Http Default and Auto-Filled Headers

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)

success = 0

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

set http = CreateObject("Chilkat.Http")

'  The following request will be sent.
'  The Accept and Accept-Encoding headers are default headers added by Chilkat.

'  GET /helloWorld.txt HTTP/1.1
'  Host: chilkatsoft.com
'  Accept: */*
'  Accept-Encoding: gzip

responseBody = http.QuickGetStr("https://chilkatsoft.com/helloWorld.txt")
'  Examine the request header we just sent..
outFile.WriteLine(http.LastHeader)
outFile.WriteLine("----")

'  Remove the default headers:
http.RemoveRequestHeader "Accept"
http.RemoveRequestHeader "Accept-Encoding"

'  Send a request with the following header:

'  GET /helloWorld.txt HTTP/1.1
'  Host: chilkatsoft.com

responseBody = http.QuickGetStr("https://chilkatsoft.com/helloWorld.txt")
outFile.WriteLine(http.LastHeader)

outFile.Close