(AutoIt) OneNote - Create Section

Creates a new notebook section in Microsoft OneNote

For more information, see https://docs.microsoft.com/en-us/graph/api/notebook-post-sections?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.

$oHttp = ObjCreate("Chilkat.Http")
Local $bSuccess

; Implements the following CURL command:

; curl -X POST https://graph.microsoft.com/v1.0/me/onenote/notebooks/{notebook_id}/sections \
;   -H 'authorization: Bearer ACCESS_TOKEN' 
;   -H "Content-type: application/json" \
;   -d '{
;   "displayName": "Section name"
; }'

; Use the following online tool to generate HTTP code from a CURL command
; Convert a cURL Command to HTTP Source Code

; Use this online tool to generate code from sample JSON:
; Generate Code to Create JSON

; The following JSON is sent in the request body.

; {
;   "displayName": "Ddd"
; }

; Create a new section named "Ddd"
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.UpdateString("displayName","Ddd")

$oHttp.SetRequestHeader "Content-type","application/json"
; Adds the "Authorization: Bearer ACCESS_TOKEN" header.
$oHttp.AuthToken = "ACCESS_TOKEN"

$oHttp.SetUrlVar("notebook_id","0-3A33FCEB9B74CC15!20344")

Local $oResp = $oHttp.PostJson3("https://graph.microsoft.com/v1.0/me/onenote/notebooks/{$notebook_id}/sections","application/json",$oJson)
If ($oHttp.LastMethodSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

$oSbResponseBody = ObjCreate("Chilkat.StringBuilder")
$oResp.GetBodySb($oSbResponseBody)
$oJResp = ObjCreate("Chilkat.JsonObject")
$oJResp.LoadSb($oSbResponseBody)
$oJResp.EmitCompact = False

ConsoleWrite("Response Body:" & @CRLF)
ConsoleWrite($oJResp.Emit() & @CRLF)

Local $iRespStatusCode = $oResp.StatusCode
ConsoleWrite("Response Status Code = " & $iRespStatusCode & @CRLF)
If ($iRespStatusCode >= 400) Then
    ConsoleWrite("Response Header:" & @CRLF)
    ConsoleWrite($oResp.Header & @CRLF)
    ConsoleWrite("Failed." & @CRLF)

    Exit
EndIf

; Sample JSON response:
; (Sample code for parsing the JSON response is shown below)

; {
;   "@odata.context": "https://graph.microsoft.com/v1.0/$metadata#users('admin%40chilkat.io')/onenote/notebooks('0-3A33FCEB9B74CC15%2120344')/sections/$entity",
;   "id": "0-3A33FCEB9B74CC15!20350",
;   "self": "https://graph.microsoft.com/v1.0/users/admin@chilkat.io/onenote/sections/0-3A33FCEB9B74CC15!20350",
;   "createdDateTime": "2020-10-22T23:22:30.673Z",
;   "displayName": "Ddd",
;   "lastModifiedDateTime": "2020-10-22T23:22:30.803Z",
;   "isDefault": false,
;   "pagesUrl": "https://graph.microsoft.com/v1.0/users/admin@chilkat.io/onenote/sections/0-3A33FCEB9B74CC15!20350/pages",
;   "createdBy": {
;     "user": {
;       "id": "3A33FCEB9B74CC15",
;       "displayName": "Matt Smith"
;     }
;   },
;   "lastModifiedBy": {
;     "user": {
;       "id": "3A33FCEB9B74CC15",
;       "displayName": "Matt Smith"
;     }
;   }
; }

; Sample code for parsing the JSON response...
; Use the following online tool to generate parsing code from sample JSON:
; Generate Parsing Code from JSON

Local $sOdata_context = $oJResp.StringOf("""@odata.context""")
Local $sId = $oJResp.StringOf("id")
Local $self = $oJResp.StringOf("self")
Local $sCreatedDateTime = $oJResp.StringOf("createdDateTime")
Local $sDisplayName = $oJResp.StringOf("displayName")
Local $sLastModifiedDateTime = $oJResp.StringOf("lastModifiedDateTime")
Local $bIsDefault = $oJResp.BoolOf("isDefault")
Local $sPagesUrl = $oJResp.StringOf("pagesUrl")
Local $sCreatedByUserId = $oJResp.StringOf("createdBy.user.id")
Local $sCreatedByUserDisplayName = $oJResp.StringOf("createdBy.user.displayName")
Local $sLastModifiedByUserId = $oJResp.StringOf("lastModifiedBy.user.id")
Local $sLastModifiedByUserDisplayName = $oJResp.StringOf("lastModifiedBy.user.displayName")