|
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
(PowerBuilder) OneNote - Get Page HTML ContentDownload the HTML content of a OneNote page. Also iterates over the images and attachments on the OneNote page and downloads the content for each. For more information, see https://docs.microsoft.com/en-us/graph/api/page-get?view=graph-rest-1.0
integer li_rc oleobject loo_Http integer li_Success oleobject loo_SbResponseBody integer li_RespStatusCode oleobject loo_Xml oleobject loo_SbState string ls_Url oleobject loo_Bd // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. loo_Http = create oleobject // Use "Chilkat_9_5_0.Http" for versions of Chilkat < 10.0.0 li_rc = loo_Http.ConnectToNewObject("Chilkat.Http") if li_rc < 0 then destroy loo_Http MessageBox("Error","Connecting to COM object failed") return end if // Implements the following CURL command: // curl -X GET https://graph.microsoft.com/v1.0/me/onenote/pages/{id}/content?includeIDs=true \ // -H 'authorization: Bearer ACCESS_TOKEN' // Use the following online tool to generate HTTP code from a CURL command // Convert a cURL Command to HTTP Source Code // Adds the "Authorization: Bearer ACCESS_TOKEN" header. loo_Http.AuthToken = "ACCESS_TOKEN" loo_Http.SetUrlVar("page_id","0-d2298668edd74dccac7f821fa378bf64!41-3A33FCEB9B74CC15!20350") loo_SbResponseBody = create oleobject // Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0 li_rc = loo_SbResponseBody.ConnectToNewObject("Chilkat.StringBuilder") li_Success = loo_Http.QuickGetSb("https://graph.microsoft.com/v1.0/me/onenote/pages/{$page_id}/content?includeIDs=true",loo_SbResponseBody) if li_Success = 0 then Write-Debug loo_Http.LastErrorText destroy loo_Http destroy loo_SbResponseBody return end if Write-Debug "HTML content:" Write-Debug loo_SbResponseBody.GetAsString() li_RespStatusCode = loo_Http.LastStatus Write-Debug "Response Status Code = " + string(li_RespStatusCode) if li_RespStatusCode >= 400 then Write-Debug "Response Header:" Write-Debug loo_Http.LastHeader Write-Debug "Failed." destroy loo_Http destroy loo_SbResponseBody return end if // Let's get the images and attached files. // Here's sample HTML content with 2 images and one PDF attachment: // <html lang="en-US"> // <head> // <title>A page with rendered images and an attached file</title> // <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> // <meta name="created" content="2020-10-23T12:00:00.0000000" /> // </head> // <body data-absolute-enabled="true" style="font-family:Calibri;font-size:11pt"> // <div id="div:{b130eb6c-638a-4f97-8f7e-b6d9e2e88bf9}{32}" data-id="_default" style="position:absolute;left:48px;top:120px;width:624px"> // <p id="p:{b130eb6c-638a-4f97-8f7e-b6d9e2e88bf9}{39}" style="margin-top:5.5pt;margin-bottom:5.5pt">Here's an image from an online source:</p> // <img id="img:{ee18fe8d-b219-4baf-9b4d-4fc680579f0d}{1}" alt="an image on the page" width="500" height="500" src="https://graph.microsoft.com/v1.0/users('admin@chilkat.io')/onenote/resources/0-e71b45b763484921b4200e32c2439a47!1-3A33FCEB9B74CC15!20350/$value" data-src-type="image/jpeg" data-fullres-src="https://graph.microsoft.com/v1.0/users('admin@chilkat.io')/onenote/resources/0-e71b45b763484921b4200e32c2439a47!1-3A33FCEB9B74CC15!20350/$value" data-fullres-src-type="image/jpeg" /> // <p id="p:{b130eb6c-638a-4f97-8f7e-b6d9e2e88bf9}{43}" style="margin-top:5.5pt;margin-bottom:5.5pt">Here's an image uploaded as binary data:</p> // <img id="img:{ee18fe8d-b219-4baf-9b4d-4fc680579f0d}{3}" alt="an image on the page" width="300" height="225" src="https://graph.microsoft.com/v1.0/users('admin@chilkat.io')/onenote/resources/0-a60516b962b842f2ae9bec75c16b31de!1-3A33FCEB9B74CC15!20350/$value" data-src-type="image/jpeg" data-fullres-src="https://graph.microsoft.com/v1.0/users('admin@chilkat.io')/onenote/resources/0-a60516b962b842f2ae9bec75c16b31de!1-3A33FCEB9B74CC15!20350/$value" data-fullres-src-type="image/jpeg" /> // <p id="p:{b130eb6c-638a-4f97-8f7e-b6d9e2e88bf9}{47}" style="margin-top:5.5pt;margin-bottom:5.5pt">Here's a file attachment:</p> // <object data-attachment="FileName.pdf" type="application/pdf" data="https://graph.microsoft.com/v1.0/users('admin@chilkat.io')/onenote/resources/0-9e685efb33a24a6a8de1b9c707d28385!1-3A33FCEB9B74CC15!20350/$value" /> // </div> // </body> // </html> loo_Xml = create oleobject // Use "Chilkat_9_5_0.Xml" for versions of Chilkat < 10.0.0 li_rc = loo_Xml.ConnectToNewObject("Chilkat.Xml") loo_Xml.LoadSb(loo_SbResponseBody,1) // Iterate over each element in the XML. Each time we find an "img" or "object", download the data. // (The sbState is an object used to keep track of the current state of the traversal.) loo_SbState = create oleobject // Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0 li_rc = loo_SbState.ConnectToNewObject("Chilkat.StringBuilder") loo_Bd = create oleobject // Use "Chilkat_9_5_0.BinData" for versions of Chilkat < 10.0.0 li_rc = loo_Bd.ConnectToNewObject("Chilkat.BinData") do while loo_Xml.NextInTraversal2(loo_SbState) <> 0 if loo_Xml.TagEquals("img") = 1 then Write-Debug "img id: " + loo_Xml.GetAttrValue("id") ls_Url = loo_Xml.GetAttrValue("src") loo_Bd.Clear() li_Success = loo_Http.QuickGetBd(ls_Url,loo_Bd) if li_Success = 0 then Write-Debug loo_Http.LastErrorText destroy loo_Http destroy loo_SbResponseBody destroy loo_Xml destroy loo_SbState destroy loo_Bd return end if Write-Debug "Downloaded from " + ls_Url Write-Debug "----" // If desired, bd.WriteFile to save the contents of bd to a file.. end if if loo_Xml.TagEquals("object") = 1 then Write-Debug "data-attachment: " + loo_Xml.GetAttrValue("data-attachment") Write-Debug "type: " + loo_Xml.GetAttrValue("type") ls_Url = loo_Xml.GetAttrValue("data") loo_Bd.Clear() li_Success = loo_Http.QuickGetBd(ls_Url,loo_Bd) if li_Success = 0 then Write-Debug loo_Http.LastErrorText destroy loo_Http destroy loo_SbResponseBody destroy loo_Xml destroy loo_SbState destroy loo_Bd return end if Write-Debug "Downloaded from " + ls_Url Write-Debug "----" // If desired, bd.WriteFile to save the contents of bd to a file.. end if loop Write-Debug "Success." destroy loo_Http destroy loo_SbResponseBody destroy loo_Xml destroy loo_SbState destroy loo_Bd |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.