Chilkat Online Tools

VBScript / Microsoft Graph / Put item

Back to Collection Items

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)

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

set http = CreateObject("Chilkat_9_5_0.Http")

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

' The following JSON is sent in the request body.

' {
'   "acl": [
'     {
'       "type": "everyone",
'       "value": "c5f19b2d-0a77-454a-9b43-abf298c3b34e",
'       "accessType": "grant"
'     }
'   ],
'   "properties": {
'     "title": "Sample item title",
'     "extension": "docx",
'     "createdBy": "John Doe",
'     "createdDateTime": "2021-04-27T11:04:00Z",
'     "iconUrl": "https://contentdepot.blob.core.windows.net/filedepot/sampleIconUrl.png",
'     "authors": [
'       "John Doe"
'     ],
'     "authors@odata.type": "Collection(String)",
'     "lastModifiedDate": "2021-04-27T11:04:00Z",
'     "url": "https://sampleItemUrl.com",
'     "containerName": "Sample container name",
'     "containerUrl": "https://sampleContainerUrl.com"
'   },
'   "content": {
'     "type": "text",
'     "value": "Empower customers and partners to be more productive by enabling them to bring content and activity information and allow external content to participate in Microsoft Search and OfficeHub experiences so that they find relevant and actionable information across all their applications."
'   }
' }

set json = CreateObject("Chilkat_9_5_0.JsonObject")
success = json.UpdateString("acl[0].type","everyone")
success = json.UpdateString("acl[0].value","c5f19b2d-0a77-454a-9b43-abf298c3b34e")
success = json.UpdateString("acl[0].accessType","grant")
success = json.UpdateString("properties.title","Sample item title")
success = json.UpdateString("properties.extension","docx")
success = json.UpdateString("properties.createdBy","John Doe")
success = json.UpdateString("properties.createdDateTime","2021-04-27T11:04:00Z")
success = json.UpdateString("properties.iconUrl","https://contentdepot.blob.core.windows.net/filedepot/sampleIconUrl.png")
success = json.UpdateString("properties.authors[0]","John Doe")
success = json.UpdateString("properties.""authors@odata.type""","Collection(String)")
success = json.UpdateString("properties.lastModifiedDate","2021-04-27T11:04:00Z")
success = json.UpdateString("properties.url","https://sampleItemUrl.com")
success = json.UpdateString("properties.containerName","Sample container name")
success = json.UpdateString("properties.containerUrl","https://sampleContainerUrl.com")
success = json.UpdateString("content.type","text")
success = json.UpdateString("content.value","Empower customers and partners to be more productive by enabling them to bring content and activity information and allow external content to participate in Microsoft Search and OfficeHub experiences so that they find relevant and actionable information across all their applications.")

' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
http.SetRequestHeader "Content-Type","application/json"

set sbRequestBody = CreateObject("Chilkat_9_5_0.StringBuilder")
success = json.EmitSb(sbRequestBody)

' resp is a Chilkat_9_5_0.HttpResponse
Set resp = http.PTextSb("PUT","https://graph.microsoft.com/v1.0/external/connections/sampleConnectionId/items/sampleItemId",sbRequestBody,"utf-8","application/json",0,0)
If (http.LastMethodSuccess = 0) Then
    outFile.WriteLine(http.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine(resp.StatusCode)
outFile.WriteLine(resp.BodyStr)


outFile.Close

Curl Command

curl -X PUT
	-H "Authorization: Bearer <access_token>"
	-H "Content-Type: application/json"
	-d '{
    "acl": [
        {
            "type": "everyone",
            "value": "c5f19b2d-0a77-454a-9b43-abf298c3b34e",
            "accessType": "grant"
        }
    ],
    "properties": {
        "title": "Sample item title",
        "extension": "docx",
        "createdBy": "John Doe",
        "createdDateTime": "2021-04-27T11:04:00Z",
        "iconUrl": "https://contentdepot.blob.core.windows.net/filedepot/sampleIconUrl.png",
        "authors": [
            "John Doe"
        ],
        "authors@odata.type": "Collection(String)",
        "lastModifiedDate": "2021-04-27T11:04:00Z",
        "url": "https://sampleItemUrl.com",
        "containerName": "Sample container name",
        "containerUrl": "https://sampleContainerUrl.com"
    },
    "content": {
        "type": "text",
        "value": "Empower customers and partners to be more productive by enabling them to bring content and activity information and allow external content to participate in Microsoft Search and OfficeHub experiences so that they find relevant and actionable information across all their applications."
    }
}'
https://graph.microsoft.com/v1.0/external/connections/sampleConnectionId/items/sampleItemId

Postman Collection Item JSON

{
  "name": "Put item",
  "event": [
    {
      "listen": "test",
      "script": {
        "exec": [
          ""
        ],
        "type": "text/javascript"
      }
    }
  ],
  "request": {
    "method": "PUT",
    "header": [
      {
        "key": "Content-Type",
        "name": "Content-Type",
        "type": "text",
        "value": "application/json"
      }
    ],
    "body": {
      "mode": "raw",
      "raw": "{\r\n    \"acl\": [\r\n        {\r\n            \"type\": \"everyone\",\r\n            \"value\": \"c5f19b2d-0a77-454a-9b43-abf298c3b34e\",\r\n            \"accessType\": \"grant\"\r\n        }\r\n    ],\r\n    \"properties\": {\r\n        \"title\": \"Sample item title\",\r\n        \"extension\": \"docx\",\r\n        \"createdBy\": \"John Doe\",\r\n        \"createdDateTime\": \"2021-04-27T11:04:00Z\",\r\n        \"iconUrl\": \"https://contentdepot.blob.core.windows.net/filedepot/sampleIconUrl.png\",\r\n        \"authors\": [\r\n            \"John Doe\"\r\n        ],\r\n        \"authors@odata.type\": \"Collection(String)\",\r\n        \"lastModifiedDate\": \"2021-04-27T11:04:00Z\",\r\n        \"url\": \"https://sampleItemUrl.com\",\r\n        \"containerName\": \"Sample container name\",\r\n        \"containerUrl\": \"https://sampleContainerUrl.com\"\r\n    },\r\n    \"content\": {\r\n        \"type\": \"text\",\r\n        \"value\": \"Empower customers and partners to be more productive by enabling them to bring content and activity information and allow external content to participate in Microsoft Search and OfficeHub experiences so that they find relevant and actionable information across all their applications.\"\r\n    }\r\n}"
    },
    "url": {
      "raw": "https://graph.microsoft.com/v1.0/external/connections/sampleConnectionId/items/sampleItemId",
      "protocol": "https",
      "host": [
        "graph",
        "microsoft",
        "com"
      ],
      "path": [
        "v1.0",
        "external",
        "connections",
        "sampleConnectionId",
        "items",
        "sampleItemId"
      ]
    }
  },
  "response": [
  ]
}