(VB.NET UWP/WinRT) OneDrive -- Download Text File to Memory

Downloads a text file (such as XML, JSON, plain-text, HTML, etc.) into a StringBuilder object.

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

Chilkat Universal Windows Platform (UWP) / WinRT Downloads Chilkat for the Universal Windows Platform (UWP)

' 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/hamlet.xml
http.SetUrlVar("item_path","Misc/hamlet.xml")

Dim sbXml As New Chilkat.StringBuilder
Dim expectedCharset As String = "utf-8"
Dim url As String = "https://graph.microsoft.com/v1.0/me/drive/root:/{$item_path}:/content"
Dim success As Boolean = Await http.DownloadSbAsync(url,expectedCharset,sbXml)
If (http.LastMethodSuccess <> True) Then
    Debug.WriteLine(http.LastErrorText)
    Exit Sub
End If


' If the response status code was not 200, then it failed.
If (http.LastStatus <> 200) Then
    Debug.WriteLine("Response Status Code = " & http.LastStatus)
    Debug.WriteLine("Failed.")
    Exit Sub
End If


' If we got here, then the file was successfully downloaded.
Debug.WriteLine("Download from OneDrive successful.")
Debug.WriteLine("The file is contained in sbXml.")