Visual FoxPro

Add Multiple Query Parameters from a Query String

Demonstrates Rest.AddQueryParams, which adds several query parameters at once from a query-string in the form field1=value1&field2=value2.

Background. This is a convenient shortcut for populating many parameters from a single pre-built query string rather than calling AddQueryParam repeatedly.

Chilkat Visual FoxPro Downloads

Download Chilkat for Visual FoxPro

Visual FoxPro

LOCAL lnSuccess
LOCAL loRest
LOCAL lnBTls
LOCAL lnBAutoReconnect
LOCAL lcQueryString
LOCAL lcResponseText

lnSuccess = 0

loRest = CreateObject('Chilkat.Rest')

*  Connect to the REST server.  The 3rd argument enables TLS (use 1 for HTTPS on port 443),
*  and the 4th enables automatic reconnection if the connection is dropped between requests.
lnBTls = 1
lnBAutoReconnect = 1
lnSuccess = loRest.Connect("example.com",443,lnBTls,lnBAutoReconnect)
IF (lnSuccess = 0) THEN
    ? loRest.LastErrorText
    RELEASE loRest
    CANCEL
ENDIF

*  Add several query parameters at once from a query-string.  Use the form field1=value1&field2=value2.
lcQueryString = "q=chilkat&limit=10&sort=asc"
lnSuccess = loRest.AddQueryParams(lcQueryString)
IF (lnSuccess = 0) THEN
    ? loRest.LastErrorText
    RELEASE loRest
    CANCEL
ENDIF

lcResponseText = loRest.FullRequestNoBody("GET","/api/search")
IF (loRest.LastMethodSuccess = 0) THEN
    ? loRest.LastErrorText
    RELEASE loRest
    CANCEL
ENDIF

? lcResponseText

RELEASE loRest