(PowerBuilder) Demonstrates the Http.QuickRequestParams Method

Demonstrates how to use the Http.QuickRequestParams method. This is where query params can be provided non-URL-encoded in JSON format.

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

integer li_rc
oleobject loo_Http
integer li_Success
oleobject loo_QueryParams
string ls_SessionLogPath
oleobject loo_Resp
oleobject loo_Fac
string ls_SessionLog

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

loo_Http = create oleobject
// Use "Chilkat_9_5_0.Http" for versions of Chilkat < 10.0.0
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
    destroy loo_Http
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Demonstrate sending a GET request with query parameters.
loo_QueryParams = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_QueryParams.ConnectToNewObject("Chilkat.JsonObject")

loo_QueryParams.UpdateInt("limit",100)
loo_QueryParams.UpdateString("email","joe@example.com")
loo_QueryParams.UpdateString("token","VGhlIHF1aWNrIGJyb3duIGZveCBqdW1wZWQgb3ZlciB0aGUgbGF6eSBkb2cuLi4=")

// Set a session log filename so we can examine the exact request that is sent.
ls_SessionLogPath = "qa_output/sessionLog.txt"
loo_Http.SessionLogFilename = ls_SessionLogPath

// Send the GET request to an endpoint.  We don't care about the response. The purpose of this example
// is to see the exact HTTP request that is sent..
loo_Resp = loo_Http.QuickRequestParams("GET","https://www.chilkatsoft.com/echoPostBody.asp",loo_QueryParams)
if loo_Http.LastMethodSuccess = 0 then
    Write-Debug loo_Http.LastErrorText
    destroy loo_Http
    destroy loo_QueryParams
    return
end if

destroy loo_Resp

loo_Fac = create oleobject
// Use "Chilkat_9_5_0.FileAccess" for versions of Chilkat < 10.0.0
li_rc = loo_Fac.ConnectToNewObject("Chilkat.FileAccess")

ls_SessionLog = loo_Fac.ReadEntireTextFile(ls_SessionLogPath,"utf-8")
Write-Debug ls_SessionLog
li_Success = loo_Fac.FileDelete(ls_SessionLogPath)

// This is the exact GET request that was sent.
// Notice how each query parameter is URL encoded and added to the HTTP start line of the request.

// GET /echoPostBody.asp?limit=100&email=joe%40example.com&token=VGhlIHF1aWNrIGJyb3duIGZveCBqdW1wZWQgb3ZlciB0aGUgbGF6eSBkb2cuLi4%3D HTTP/1.1
// Host: www.chilkatsoft.com
// Accept: */*
// Accept-Encoding: gzip


destroy loo_Http
destroy loo_QueryParams
destroy loo_Fac