Sample code for 30+ languages & platforms
PowerBuilder

OneNote - Get Page HTML Content

See more OneNote Examples

Download the HTML content of a OneNote page. Also iterates over the images and attachments on the OneNote page and downloads the content for each.

Chilkat PowerBuilder Downloads

PowerBuilder
integer li_rc
integer li_Success
oleobject loo_Http
oleobject loo_SbResponseBody
integer li_RespStatusCode
oleobject loo_Xml
oleobject loo_SbState
string ls_Url
oleobject loo_Bd

li_Success = 0

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loo_Http = create oleobject
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
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&#39;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&#39;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&#39;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
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
li_rc = loo_SbState.ConnectToNewObject("Chilkat.StringBuilder")

loo_Bd = create oleobject
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