(Tcl) Box.com Download Binary File to Memory

See more Box Examples

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

set success 0

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

set http [new_CkHttp]

CkHttp_put_KeepResponseBody $http 1

# Provide a previously obtained OAuth2 access token.
# See Get Box OAuth2 Access Token.
CkHttp_put_AuthToken $http "BOX_ACCESS_TOKEN"

CkHttp_put_FollowRedirects $http 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
set bd [new_CkBinData]

set success [CkHttp_DownloadBd $http "https://api.box.com/2.0/files/283371752129/content" $bd]
set statusCode [CkHttp_get_LastStatus $http]
if {$success == 0} then {
    if {$statusCode == 0} then {
        # Unable to either send the request or get the response.
        puts [CkHttp_lastErrorText $http]
    }     else {
        # We got a response, but the status code was not in the 200s
        puts "Response status code: $statusCode"
        # Examine the response body.
        puts "Response body:"
        puts [CkHttp_lastResponseBody $http]
    }

    puts "Download failed."

} else {
    puts "Downloaded tigers.jpeg into an object holding the binary data."

    puts "Number of bytes: [CkBinData_get_NumBytes $bd]"
}


delete_CkHttp $http
delete_CkBinData $bd