Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PureBasic) OneDrive -- Download Text File to MemoryDownloads 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.
IncludeFile "CkStringBuilder.pb" IncludeFile "CkHttp.pb" Procedure ChilkatExample() ; This example requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. http.i = CkHttp::ckCreate() If http.i = 0 Debug "Failed to create object." ProcedureReturn EndIf ; 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.) CkHttp::setCkAuthToken(http, "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 CkHttp::setCkFollowRedirects(http, 1) ; This example will download /Misc/hamlet.xml CkHttp::ckSetUrlVar(http,"item_path","Misc/hamlet.xml") sbXml.i = CkStringBuilder::ckCreate() If sbXml.i = 0 Debug "Failed to create object." ProcedureReturn EndIf expectedCharset.s = "utf-8" url.s = "https://graph.microsoft.com/v1.0/me/drive/root:/{$item_path}:/content" success.i = CkHttp::ckDownloadSb(http,url,expectedCharset,sbXml) If CkHttp::ckLastMethodSuccess(http) <> 1 Debug CkHttp::ckLastErrorText(http) CkHttp::ckDispose(http) CkStringBuilder::ckDispose(sbXml) ProcedureReturn EndIf ; If the response status code was not 200, then it failed. If CkHttp::ckLastStatus(http) <> 200 Debug "Response Status Code = " + Str(CkHttp::ckLastStatus(http)) Debug "Failed." CkHttp::ckDispose(http) CkStringBuilder::ckDispose(sbXml) ProcedureReturn EndIf ; If we got here, then the file was successfully downloaded. Debug "Download from OneDrive successful." Debug "The file is contained in sbXml." CkHttp::ckDispose(http) CkStringBuilder::ckDispose(sbXml) ProcedureReturn EndProcedure |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.