(Xojo Plugin) OneDrive -- Download Binary File to Memory

Downloads a binary file (such as JPG, PDF, etc.) into a BinData object.

Note: This example requires Chilkat v9.5.0.68 or greater.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM

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

Dim http As New Chilkat.Http

// Use your previously obtained access token here:
// See the following examples for getting an access token:
//    Get Microsoft Graph OAuth2 Access Token (Azure AD v2.0 Endpoint).
//    Get Microsoft Graph OAuth2 Access Token (Azure AD Endpoint).
//    Refresh Access Token (Azure AD v2.0 Endpoint).
//    Refresh Access Token (Azure AD Endpoint).

// (Make sure your token was obtained with the FilesRead or Files.ReadWrite scope.)
http.AuthToken = "MICROSOFT_GRAPH_ACCESS_TOKEN"

// Sends the following GET request:
// GET https://graph.microsoft.com/v1.0/me/drive/root:/{item-path}:/content

// Make sure to automatically follow redirects
http.FollowRedirects = True

// This example will download /Misc/starfish.jpg
success = http.SetUrlVar("item_path","Misc/starfish.jpg")

Dim fileData As New Chilkat.BinData
Dim url As String
url = "https://graph.microsoft.com/v1.0/me/drive/root:/{$item_path}:/content"
Dim success As Boolean
success = http.DownloadBd(url,fileData)
If (http.LastMethodSuccess <> True) Then
    System.DebugLog(http.LastErrorText)
    Return
End If

// If the response status code was not 200, then it failed.
If (http.LastStatus <> 200) Then
    System.DebugLog("Response Status Code = " + Str(http.LastStatus))
    System.DebugLog("Failed.")
    Return
End If

// If we got here, then the file was successfully downloaded.
System.DebugLog("Download binary from OneDrive successful.")
System.DebugLog("The file is contained in fileData.")