(Visual FoxPro) Box.com Download Binary File to Memory

See more Box Examples

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

LOCAL lnSuccess
LOCAL loHttp
LOCAL loBd
LOCAL lnStatusCode

lnSuccess = 0

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

loHttp = CreateObject('Chilkat.Http')
loHttp.KeepResponseBody = 1

* Provide a previously obtained OAuth2 access token.
* See Get Box OAuth2 Access Token.
loHttp.AuthToken = "BOX_ACCESS_TOKEN"

loHttp.FollowRedirects = 1

* The file is specified by the file ID.
* In this case, we're downloading a file with FILE_ID = 283371752129.
* The general form of the URL for downloading is: https://api.box.com/2.0/files/FILE_ID/content
loBd = CreateObject('Chilkat.BinData')
lnSuccess = loHttp.DownloadBd("https://api.box.com/2.0/files/283371752129/content",loBd)
lnStatusCode = loHttp.LastStatus
IF (lnSuccess = 0) THEN
    IF (lnStatusCode = 0) THEN
        * Unable to either send the request or get the response.
        ? loHttp.LastErrorText
    ELSE
        * We got a response, but the status code was not in the 200s
        ? "Response status code: " + STR(lnStatusCode)
        * Examine the response body.
        ? "Response body:"
        ? loHttp.LastResponseBody
    ENDIF

    ? "Download failed."

ELSE
    ? "Downloaded tigers.jpeg into an object holding the binary data."

    ? "Number of bytes: " + STR(loBd.NumBytes)
ENDIF

RELEASE loHttp
RELEASE loBd