(Xojo Plugin) Add Custom Header to HTTP GET
Demonstrates how to add a custom HTTP request header to an HTTP GET. This is not a request parameter, but is a header added to the MIME header of the HTTP request.
// All Chilkat classes can be unlocked at once at the beginning of a program
// by calling UnlockBundle. It requires a Bundle unlock code.
Dim chilkatGlob As New Chilkat.CkGlobal
Dim success As Boolean
success = chilkatGlob.UnlockBundle("Anything for 30-day trial.")
If (success <> True) Then
System.DebugLog(chilkatGlob.LastErrorText)
Return
End If
Dim http As New Chilkat.Http
// Add a custom header. The MIME field name is "X-CSRF-Token", and the
// header field value is "Fetch".
http.SetRequestHeader "X-CSRF-Token","Fetch"
// Send the HTTP GET and return the content in a string.
Dim html As String
html = http.QuickGetStr("http://www.galapagos.org/")
System.DebugLog(html)
|