(VBScript) HTTP Verb - How to use any Verb (GET, PUT, POST, DELETE, PROPFIND, etc.)

The HttpVerb property may be set to anything. Typically, it is set to the common/standard HTTP verbs such as GET, POST, PUT, DELETE, etc. It can be set to anything, including custom verbs that only have meaning to your particular server-side application.

This example demonstrates how to compose an HTTP request using the PROPFIND verb, which is something one might use with a WebDAV request.

This example composes the following HTTP request:

   PROPFIND  /container/ HTTP/1.1
   Host: www.foo.bar
   Depth: 1
   Content-Type: text/xml; charset="utf-8"
   Content-Length: xxxx

   <?xml version="1.0" encoding="utf-8" ?>
   <D:propfind xmlns:D="DAV:">
     <D:allprop/>
   </D:propfind>

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

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

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.HttpRequest")
set req = CreateObject("Chilkat.HttpRequest")

' The ContentType, HttpVerb, and Path properties should
' always be explicitly set.
req.HttpVerb = "PROPFIND"
req.Path = "/container/"
req.ContentType = "text/xml"
req.Charset = "utf-8"
req.SendCharset = 1

req.AddHeader "Depth","1"

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml")
set xml = CreateObject("Chilkat.Xml")
xml.Tag = "propfind"
success = xml.AddAttribute("xmlns:D","DAV:")
xml.NewChild2 "allprop",""

success = req.LoadBodyFromString(xml.GetXml(),"utf-8")

' View the request that would be sent if SynchronousRequest was called:
requestMime = req.GenerateRequestText()
outFile.WriteLine(requestMime)

' A few important comments about the HTTP request that is generated:
' 
' 1) The Content-Length header is automatically generated based on the actual length of the MIME message
'    that follows the intial (topmost) MIME header.
' 2) The HOST header will automatically get filled in with the actual domain when SynchronousRequest
'    is called

outFile.Close