Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3/4 Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(Tcl) OneDrive -- Upload Binary Data from MemoryDemonstrates how to upload binary data directly from memory to the signed-in user's OneDrive. This uses OneDrive's simple upload API to upload in a single API call, which only supports uploads up to 4MB in size. (See the other example(s) for uploading larger files.) Note: This example requires Chilkat v9.5.0.68 or greater.
load ./chilkat.dll # This example requires the Chilkat API to have been previously unlocked. # See Global Unlock Sample for sample code. set http [new_CkHttp] # 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 Files.ReadWrite scope.) CkHttp_put_AuthToken $http "MICROSOFT_GRAPH_ACCESS_TOKEN" # First, let's download a PDF from the web directly into memory. Then upload the PDF # to OneDrive. set pdfBytes [new_CkBinData] set success [CkHttp_QuickGetBd $http "https://www.chilkatsoft.com/data/pdf/sample.pdf" $pdfBytes] if {[expr $success != 1]} then { puts [CkHttp_lastErrorText $http] delete_CkHttp $http delete_CkBinData $pdfBytes exit } # Upload the PDF to our OneDrive to /someFolder/sample.pdf set req [new_CkHttpRequest] CkHttpRequest_put_HttpVerb $req "PUT" CkHttpRequest_put_Path $req "/v1.0/users/me/drive/root:/someFolder/sample.pdf:/content" CkHttpRequest_LoadBodyFromBd $req $pdfBytes # If you're uploading a file and don't know what the Content-Type should be, # just use "application/octet-stream". CkHttpRequest_put_ContentType $req "application/pdf" # resp is a CkHttpResponse set resp [CkHttp_SynchronousRequest $http "graph.microsoft.com" 443 1 $req] if {[expr [CkHttp_get_LastMethodSuccess $http] != 1]} then { puts [CkHttp_lastErrorText $http] delete_CkHttp $http delete_CkBinData $pdfBytes delete_CkHttpRequest $req exit } # If successful, a 201 status code is returned, with the driveItem object in the response body for the newly created file. set json [new_CkJsonObject] CkJsonObject_put_EmitCompact $json 0 CkJsonObject_Load $json [CkHttpResponse_bodyStr $resp] if {[expr [CkHttpResponse_get_StatusCode $resp] != 201]} then { puts [CkJsonObject_emit $json] puts "Response status = [CkHttpResponse_get_StatusCode $resp]" delete_CkHttpResponse $resp delete_CkHttp $http delete_CkBinData $pdfBytes delete_CkHttpRequest $req delete_CkJsonObject $json exit } delete_CkHttpResponse $resp # Success. Examine the driveItem JSON object: puts [CkJsonObject_emit $json] puts "-- Success --" # Here is a sample successful response: # { # "@odata.context": "https://graph.microsoft.com/v1.0/$metadata#users('me')/drive/root/$entity", # "@microsoft.graph.downloadUrl": "https://s5ucmg.dm2301.livefilestore.com/y4ppZYP8kjqVleyrDvphxvO8vSRxNRcYn75t5K6gNARH1cDMI3CBH3XvZ7nNHJoKMg7lQo41XLaaYiQDw1EdRg9QNTv_rtDXOnUwaipJfJyTlNXh6WOljIXOm1R2fHDk2tDq_9C9gB-prnN2NxhnXZw08YQyTnpHZXIz1w9xBxqkPn0tzF-aQSldx5e15t93Ftd1AqigReYgpF1gXtIISQs7hk2JRAYhW2d84HxEuqDXdw", # "createdBy": { # "application": { # "displayName": "Chilkat", # "id": "441c9990" # }, # "user": { # "displayName": "Matt Smith", # "id": "3a33fceb9b74cc15" # } # }, # "createdDateTime": "2017-06-03T18:18:17.7Z", # "cTag": "aYzozQTMzRkNFQjlCNzRDQzE1ITQ4NjcuMjU3", # "eTag": "aM0EzM0ZDRUI5Qjc0Q0MxNSE0ODY3LjA", # "id": "3A33FCEB9B74CC15!4867", # "lastModifiedBy": { # "application": { # "displayName": "Chilkat", # "id": "441c9990" # }, # "user": { # "displayName": "Matt Smith", # "id": "3a33fceb9b74cc15" # } # }, # "lastModifiedDateTime": "2017-06-03T18:18:17.7Z", # "name": "sample.pdf", # "parentReference": { # "driveId": "3a33fceb9b74cc15", # "id": "3A33FCEB9B74CC15!4862", # "name": "someFolder", # "path": "/drive/root:/someFolder" # }, # "size": 178399, # "webUrl": "https://1drv.ms/b/s!ABXMdJvr_DM6pgM", # "file": { # "hashes": { # "sha1Hash": "1456955C84C2DAC9DA613DC80E3017533BDC368A" # }, # "mimeType": "application/pdf" # }, # "fileSystemInfo": { # "createdDateTime": "2017-06-03T18:18:17.7Z", # "lastModifiedDateTime": "2017-06-03T18:18:17.7Z" # } # } delete_CkHttp $http delete_CkBinData $pdfBytes delete_CkHttpRequest $req delete_CkJsonObject $json |
© 2000-2016 Chilkat Software, Inc. All Rights Reserved.