Sample code for 30+ languages & platforms
VBScript

Box.com Download Binary File to Memory

See more Box Examples

Retrieves the actual data of the file into a memory (not to a local file).

Chilkat VBScript Downloads

VBScript
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

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

set http = CreateObject("Chilkat.Http")
http.KeepResponseBody = 1

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

http.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
set bd = CreateObject("Chilkat.BinData")
success = http.DownloadBd("https://api.box.com/2.0/files/283371752129/content",bd)
statusCode = http.LastStatus
If (success = 0) Then
    If (statusCode = 0) Then
        ' Unable to either send the request or get the response.
        outFile.WriteLine(http.LastErrorText)
    Else
        ' We got a response, but the status code was not in the 200s
        outFile.WriteLine("Response status code: " & statusCode)
        ' Examine the response body.
        outFile.WriteLine("Response body:")
        outFile.WriteLine(http.LastResponseBody)
    End If

    outFile.WriteLine("Download failed.")

Else
    outFile.WriteLine("Downloaded tigers.jpeg into an object holding the binary data.")

    outFile.WriteLine("Number of bytes: " & bd.NumBytes)
End If


outFile.Close