(Visual FoxPro) 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

LOCAL loHttp
LOCAL lnSuccess
LOCAL loQueryParams
LOCAL lcSessionLogPath
LOCAL loResp
LOCAL loFac
LOCAL lcSessionLog

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http')
loHttp = CreateObject('Chilkat.Http')

* Demonstrate sending a GET request with query parameters.
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject')
loQueryParams = CreateObject('Chilkat.JsonObject')
loQueryParams.UpdateInt("limit",100)
loQueryParams.UpdateString("email","joe@example.com")
loQueryParams.UpdateString("token","VGhlIHF1aWNrIGJyb3duIGZveCBqdW1wZWQgb3ZlciB0aGUgbGF6eSBkb2cuLi4=")

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

* 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..
loResp = loHttp.QuickRequestParams("GET","https://www.chilkatsoft.com/echoPostBody.asp",loQueryParams)
IF (loHttp.LastMethodSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loQueryParams
    CANCEL
ENDIF

RELEASE loResp

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.FileAccess')
loFac = CreateObject('Chilkat.FileAccess')
lcSessionLog = loFac.ReadEntireTextFile(lcSessionLogPath,"utf-8")
? lcSessionLog
lnSuccess = loFac.FileDelete(lcSessionLogPath)

* 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

RELEASE loHttp
RELEASE loQueryParams
RELEASE loFac