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
(Visual FoxPro) OneDrive -- Search for FilesSee more OneDrive ExamplesSearch for files within a hierarchy of items for items matching a query. You can search within a folder hierarhcy or a whole drive. Note: This example requires Chilkat v9.5.0.68 or greater.
LOCAL loHttp LOCAL loSbResults LOCAL lnSuccess LOCAL loJson LOCAL loLastMod LOCAL loPhotoTaken LOCAL i LOCAL lnNumItems * This example requires the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loHttp = CreateObject('Chilkat_9_5_0.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.) loHttp.AuthToken = "MICROSOFT_GRAPH_ACCESS_TOKEN" * Sends the following GET request: * Search the entire drive like this: * If not using "me", then the path should be /v1.0/users/{id | userPrincipalName}/... * GET /v1.0/me/drive/root/search(q='{search-text}') * Or search under a particular folder like this: * GET /v1.0/me/drive/root:/{item-path}:/search(q='{search-text}') * This example will search for files in or under the "/Misc" directory, having "penguin" in the file path. loHttp.SetUrlVar("item_path","/Misc") loHttp.SetUrlVar("search_text","penguins") loSbResults = CreateObject('Chilkat_9_5_0.StringBuilder') lnSuccess = loHttp.QuickGetSb("https://graph.microsoft.com/v1.0/me/drive/root:/{$item_path}:/search(q='{$search_text}')",loSbResults) IF (loHttp.LastMethodSuccess <> 1) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loSbResults CANCEL ENDIF * The response should be JSON. loJson = CreateObject('Chilkat_9_5_0.JsonObject') loJson.EmitCompact = 0 loJson.LoadSb(loSbResults) * A successful response should return a status code of 200. IF (loHttp.LastStatus <> 200) THEN ? loJson.Emit() ? "Response status = " + STR(loHttp.LastStatus) RELEASE loHttp RELEASE loSbResults RELEASE loJson CANCEL ENDIF ? loJson.Emit() ? "--" * Iterate over the results in the JSON response: loLastMod = CreateObject('Chilkat_9_5_0.CkDateTime') loPhotoTaken = CreateObject('Chilkat_9_5_0.CkDateTime') i = 0 lnNumItems = loJson.SizeOfArray("value") DO WHILE i < lnNumItems loJson.I = i ? "-- DriveItem " + STR(i + 1) ? "id: " + loJson.StringOf("value[i].id") ? "name: " + loJson.StringOf("value[i].name") ? "size: " + STR(loJson.IntOf("value[i].size")) * Get the lastModifiedDateTime loLastMod.SetFromTimestamp(loJson.StringOf("value[i].fileSystemInfo.lastModifiedDateTime")) * Is this a folder? IF (loJson.HasMember("value[i].folder") = 1) THEN ? "This is a folder with " + STR(loJson.IntOf("value[i].folder.childCount")) + " children" ENDIF IF (loJson.HasMember("value[i].file") = 1) THEN ? "This is a file." ? "SHA1 hash: " + loJson.StringOf("value[i].file.hashes.sha1Hash") ? "mimeType: " + loJson.StringOf("value[i].mimeType") ENDIF IF (loJson.HasMember("value[i].image") = 1) THEN ? "This is an image." ? "height: " + STR(loJson.IntOf("value[i].image.height")) ? "width: " + STR(loJson.IntOf("value[i].image.width")) ENDIF IF (loJson.HasMember("value[i].photo") = 1) THEN ? "This is a photo." loPhotoTaken.SetFromTimestamp(loJson.StringOf("value[i].photo.takenDateTime")) ? "photo taken on " + loPhotoTaken.GetAsRfc822(1) ENDIF IF (loJson.HasMember("value[i].audio") = 1) THEN ? "This is an audio file." ? "duration: " + STR(loJson.IntOf("value[i].audio.duration")) ENDIF i = i + 1 ENDDO * Sample JSON OneDrive search response: * { * "@odata.context": "https://graph.microsoft.com/v1.0/$metadata#Collection(driveItem)", * "value": [ * { * "@odata.type": "#microsoft.graph.driveItem", * "@microsoft.graph.downloadUrl": "https://public.dm2301.livefilestore.com/y4m01N6dLIV7ditztcRwWDx2Jzf1qiwJNASFiHfajfZUuJnEMgHmIZTASy3lNzwUFHQgET0I11hzqCyb0A6I5jhI9FgFAJlBJHFrToT7QXj2xvCV46LOZVJASk79LEWRRM97aOhdOHhKeIl_HxoIWSl08sX3kGyC50RP72rDE7ERSVdZAa3CmMNkp6tRtfKI5wfJNqSx3NeqLQ6LxwBBY4KgniPQOgEna0G_MKTGDt10T4", * "createdBy": { * "user": { * "displayName": "Matt Smith", * "id": "3a33fceb9b74cc15" * } * }, * "createdDateTime": "2017-06-04T20:40:22.48Z", * "cTag": "aYzozQTMzRkNFQjlCNzRDQzE1ITQ4NzIuMjU3", * "eTag": "aM0EzM0ZDRUI5Qjc0Q0MxNSE0ODcyLjI", * "id": "3A33FCEB9B74CC15!4872", * "lastModifiedBy": { * "user": { * "displayName": "Matt Smith", * "id": "3a33fceb9b74cc15" * } * }, * "lastModifiedDateTime": "2017-06-04T20:40:23.463Z", * "name": "penguins.jpg", * "parentReference": { * "driveId": "3a33fceb9b74cc15", * "id": "3A33FCEB9B74CC15!4871", * "name": "wildlife", * "path": "/drive/root:/Misc/wildlife" * }, * "size": 777835, * "webUrl": "https://1drv.ms/i/s!ABXMdJvr_DM6pgg", * "file": { * "hashes": { * "sha1Hash": "DF7BE9DC4F467187783ACA68C7CE98E4DF2172D0" * }, * "mimeType": "image/jpeg" * }, * "fileSystemInfo": { * "createdDateTime": "2017-06-04T20:40:22.48Z", * "lastModifiedDateTime": "2009-07-14T05:32:31.674Z" * }, * "image": { * "height": 768, * "width": 1024 * }, * "photo": { * "takenDateTime": "2008-02-18T05:07:31Z" * }, * "searchResult": { * "onClickTelemetryUrl": "https://www.bing.com/personalsearchclick?IG=D10F15177AE54D49A97F361270D53290&CID=3A33FCEB9B74CC150000000000000000&ID=DevEx%2c5005&q=penguins&resid=3A33FCEB9B74CC15%214872" * } * } * ] * } RELEASE loHttp RELEASE loSbResults RELEASE loJson RELEASE loLastMod RELEASE loPhotoTaken |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.