(Visual Basic 6.0) OneNote - Delete Page

Deletes a OneNote page.

For more information, see https://docs.microsoft.com/en-us/graph/api/page-delete?view=graph-rest-1.0&tabs=http

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

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

Dim http As New ChilkatHttp
Dim success As Long

' Adds the "Authorization: Bearer ACCESS_TOKEN" header.
http.AuthToken = "ACCESS_TOKEN"

success = http.SetUrlVar("page_id","0-5c32e6bbbe5f4fc18240e2ba96fae55f!34-3A33FCEB9B74CC15!20350")

Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequest("DELETE","https://graph.microsoft.com/v1.0/me/onenote/pages/{$page_id}")
If (http.LastMethodSuccess = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

' Success is a 204 response status code with an empty body.
Debug.Print "Response status code: " & resp.StatusCode
Debug.Print "Response body:"
Debug.Print resp.BodyStr