Chilkat Online Tools

VB.NET / Salesforce Platform APIs / Feed Elements Capability, Comments Items

Back to Collection Items

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

Dim http As New Chilkat.Http
Dim success As Boolean

' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"

Dim resp As Chilkat.HttpResponse = http.QuickRequest("POST","Comment")
If (http.LastMethodSuccess = False) Then
    Debug.WriteLine(http.LastErrorText)
    Exit Sub
End If


Dim sbResponseBody As New Chilkat.StringBuilder
resp.GetBodySb(sbResponseBody)

Dim jResp As New Chilkat.JsonObject
jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = False

Debug.WriteLine("Response Body:")
Debug.WriteLine(jResp.Emit())

Dim respStatusCode As Integer = resp.StatusCode
Debug.WriteLine("Response Status Code = " & respStatusCode)
If (respStatusCode >= 400) Then
    Debug.WriteLine("Response Header:")
    Debug.WriteLine(resp.Header)
    Debug.WriteLine("Failed.")

    Exit Sub
End If



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

' {
'   "body": {
'     "isRichText": false,
'     "messageSegments": [
'       {
'         "text": "New Comment",
'         "type": "Text"
'       }
'     ],
'     "text": "New Comment"
'   },
'   "capabilities": {
'     "edit": {
'       "isEditRestricted": false,
'       "isEditableByMeUrl": "/services/data/v58.0/chatter/comments/0D7.../capabilities/edit/is-editable-by-me",
'       "lastEditedBy": null,
'       "lastEditedDate": null,
'       "latestRevision": 1,
'       "relativeLastEditedDate": null
'     },
'     "status": {
'       "feedEntityStatus": "Published",
'       "isApprovableByMe": true
'     },
'     "upDownVote": {
'       "downVoteCount": 0,
'       "myVote": "None",
'       "upVoteCount": 0
'     },
'     "verified": {
'       "isVerifiableByMe": false,
'       "isVerified": false,
'       "isVerifiedByAnonymized": null,
'       "lastVerifiedByUser": null,
'       "lastVerifiedDate": null
'     }
'   },
'   "clientInfo": {
'     "applicationName": "Postman Playground",
'     "applicationUrl": null
'   },
'   "createdDate": "2023-11-22T11:14:33.000Z",
'   "feedElement": {
'     "id": "0D5...",
'     "url": "/services/data/v58.0/chatter/feed-elements/0D5..."
'   },
'   "id": "0D7...",
'   "isDeleteRestricted": false,
'   "likes": {
'     "currentPageToken": null,
'     "currentPageUrl": "/services/data/v58.0/chatter/comments/0D7.../likes",
'     "items": [
'     ],
'     "nextPageToken": null,
'     "nextPageUrl": null,
'     "previousPageToken": null,
'     "previousPageUrl": null,
'     "total": 0
'   },
'   "likesMessage": null,
'   "moderationFlags": null,
'   "myLike": null,
'   "parent": {
'     "id": "001...",
'     "url": "/services/data/v58.0/chatter/records/001..."
'   },
'   "relativeCreatedDate": "Just now",
'   "threadLevel": 0,
'   "threadParentId": null,
'   "type": "TextComment",
'   "url": "/services/data/v58.0/chatter/comments/0D7...",
'   "user": {
'     "additionalLabel": null,
'     "communityNickname": "User1696423780773910041",
'     "companyName": "Salesforce",
'     "displayName": "Name",
'     "firstName": "Firstname",
'     "id": "005...",
'     "isActive": true,
'     "isInThisCommunity": true,
'     "lastName": "Name",
'     "motif": {
'       "color": "1B96FF",
'       "largeIconUrl": "/img/icon/profile64.png",
'       "mediumIconUrl": "/img/icon/profile32.png",
'       "smallIconUrl": "/img/icon/profile16.png",
'       "svgIconUrl": null
'     },
'     "mySubscription": null,
'     "name": "Name",
'     "outOfOffice": {
'       "message": ""
'     },
'     "photo": {
'       "fullEmailPhotoUrl": "https://<my_domain>/ncsphoto/1wsMlOd3tVC7boygqBO8wMT9KzA0D6tqzpbs-Uw0IogXzXAXaYKJnuWCNQmXymRq?fromEmail=1",
'       "largePhotoUrl": "https://<my_domain>/profilephoto/729.../F",
'       "mediumPhotoUrl": "https://<my_domain>/profilephoto/729.../M",
'       "photoVersionId": "729...",
'       "smallPhotoUrl": "https://<my_domain>/profilephoto/729.../T",
'       "standardEmailPhotoUrl": "https://<my_domain>/ncsphoto/1wsMlOd3tVC7boygqBO8wMT9KzA0D6tqzpbs-Uw0Ioi-dtynkoFWsl46as__TDFU?fromEmail=1",
'       "url": "/services/data/v58.0/connect/user-profiles/005.../photo"
'     },
'     "reputation": null,
'     "title": null,
'     "type": "User",
'     "url": "/services/data/v58.0/chatter/users/005...",
'     "userType": "Internal"
'   }
' }

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



Dim text As String

Dim IsRichText As Boolean = jResp.BoolOf("body.isRichText")
Dim Text As String = jResp.StringOf("body.text")
Dim IsEditRestricted As Boolean = jResp.BoolOf("capabilities.edit.isEditRestricted")
Dim IsEditableByMeUrl As String = jResp.StringOf("capabilities.edit.isEditableByMeUrl")
Dim LastEditedBy As String = jResp.StringOf("capabilities.edit.lastEditedBy")
Dim LastEditedDate As String = jResp.StringOf("capabilities.edit.lastEditedDate")
Dim LatestRevision As Integer = jResp.IntOf("capabilities.edit.latestRevision")
Dim RelativeLastEditedDate As String = jResp.StringOf("capabilities.edit.relativeLastEditedDate")
Dim FeedEntityStatus As String = jResp.StringOf("capabilities.status.feedEntityStatus")
Dim IsApprovableByMe As Boolean = jResp.BoolOf("capabilities.status.isApprovableByMe")
Dim DownVoteCount As Integer = jResp.IntOf("capabilities.upDownVote.downVoteCount")
Dim MyVote As String = jResp.StringOf("capabilities.upDownVote.myVote")
Dim UpVoteCount As Integer = jResp.IntOf("capabilities.upDownVote.upVoteCount")
Dim IsVerifiableByMe As Boolean = jResp.BoolOf("capabilities.verified.isVerifiableByMe")
Dim IsVerified As Boolean = jResp.BoolOf("capabilities.verified.isVerified")
Dim IsVerifiedByAnonymized As String = jResp.StringOf("capabilities.verified.isVerifiedByAnonymized")
Dim LastVerifiedByUser As String = jResp.StringOf("capabilities.verified.lastVerifiedByUser")
Dim LastVerifiedDate As String = jResp.StringOf("capabilities.verified.lastVerifiedDate")
Dim ApplicationName As String = jResp.StringOf("clientInfo.applicationName")
Dim ApplicationUrl As String = jResp.StringOf("clientInfo.applicationUrl")
Dim createdDate As String = jResp.StringOf("createdDate")
Dim Id As String = jResp.StringOf("feedElement.id")
Dim v_Url As String = jResp.StringOf("feedElement.url")
Dim id As String = jResp.StringOf("id")
Dim isDeleteRestricted As Boolean = jResp.BoolOf("isDeleteRestricted")
Dim CurrentPageToken As String = jResp.StringOf("likes.currentPageToken")
Dim CurrentPageUrl As String = jResp.StringOf("likes.currentPageUrl")
Dim NextPageToken As String = jResp.StringOf("likes.nextPageToken")
Dim NextPageUrl As String = jResp.StringOf("likes.nextPageUrl")
Dim PreviousPageToken As String = jResp.StringOf("likes.previousPageToken")
Dim PreviousPageUrl As String = jResp.StringOf("likes.previousPageUrl")
Dim Total As Integer = jResp.IntOf("likes.total")
Dim likesMessage As String = jResp.StringOf("likesMessage")
Dim moderationFlags As String = jResp.StringOf("moderationFlags")
Dim myLike As String = jResp.StringOf("myLike")
Dim parentId As String = jResp.StringOf("parent.id")
Dim parentUrl As String = jResp.StringOf("parent.url")
Dim relativeCreatedDate As String = jResp.StringOf("relativeCreatedDate")
Dim threadLevel As Integer = jResp.IntOf("threadLevel")
Dim threadParentId As String = jResp.StringOf("threadParentId")
Dim v_type As String = jResp.StringOf("type")
Dim url As String = jResp.StringOf("url")
Dim AdditionalLabel As String = jResp.StringOf("user.additionalLabel")
Dim CommunityNickname As String = jResp.StringOf("user.communityNickname")
Dim CompanyName As String = jResp.StringOf("user.companyName")
Dim DisplayName As String = jResp.StringOf("user.displayName")
Dim FirstName As String = jResp.StringOf("user.firstName")
Dim userId As String = jResp.StringOf("user.id")
Dim IsActive As Boolean = jResp.BoolOf("user.isActive")
Dim IsInThisCommunity As Boolean = jResp.BoolOf("user.isInThisCommunity")
Dim LastName As String = jResp.StringOf("user.lastName")
Dim Color As String = jResp.StringOf("user.motif.color")
Dim LargeIconUrl As String = jResp.StringOf("user.motif.largeIconUrl")
Dim MediumIconUrl As String = jResp.StringOf("user.motif.mediumIconUrl")
Dim SmallIconUrl As String = jResp.StringOf("user.motif.smallIconUrl")
Dim SvgIconUrl As String = jResp.StringOf("user.motif.svgIconUrl")
Dim MySubscription As String = jResp.StringOf("user.mySubscription")
Dim Name As String = jResp.StringOf("user.name")
Dim Message As String = jResp.StringOf("user.outOfOffice.message")
Dim FullEmailPhotoUrl As String = jResp.StringOf("user.photo.fullEmailPhotoUrl")
Dim LargePhotoUrl As String = jResp.StringOf("user.photo.largePhotoUrl")
Dim MediumPhotoUrl As String = jResp.StringOf("user.photo.mediumPhotoUrl")
Dim PhotoVersionId As String = jResp.StringOf("user.photo.photoVersionId")
Dim SmallPhotoUrl As String = jResp.StringOf("user.photo.smallPhotoUrl")
Dim StandardEmailPhotoUrl As String = jResp.StringOf("user.photo.standardEmailPhotoUrl")
Dim PhotoUrl As String = jResp.StringOf("user.photo.url")
Dim Reputation As String = jResp.StringOf("user.reputation")
Dim Title As String = jResp.StringOf("user.title")
Dim v_Type As String = jResp.StringOf("user.type")
Dim userUrl As String = jResp.StringOf("user.url")
Dim UserType As String = jResp.StringOf("user.userType")
Dim i As Integer = 0
Dim count_i As Integer = jResp.SizeOfArray("body.messageSegments")
While i < count_i
    jResp.I = i
    text = jResp.StringOf("body.messageSegments[i].text")
    v_type = jResp.StringOf("body.messageSegments[i].type")
    i = i + 1
End While
i = 0
count_i = jResp.SizeOfArray("likes.items")
While i < count_i
    jResp.I = i
    i = i + 1
End While

Curl Command

curl -X POST
	-H "Authorization: Bearer <access_token>"
https://domain.com/services/data/v{{version}}/chatter/feed-elements/:FEED_ELEMENT_ID/capabilities/comments/items?text=New Comment

Postman Collection Item JSON

{
  "name": "Feed Elements Capability, Comments Items",
  "event": [
    {
      "listen": "prerequest",
      "script": {
        "exec": [
          ""
        ],
        "type": "text/javascript"
      }
    },
    {
      "listen": "test",
      "script": {
        "exec": [
          ""
        ],
        "type": "text/javascript"
      }
    }
  ],
  "request": {
    "method": "POST",
    "header": [
    ],
    "url": {
      "raw": "{{_endpoint}}/services/data/v{{version}}/chatter/feed-elements/:FEED_ELEMENT_ID/capabilities/comments/items?text=New Comment",
      "host": [
        "{{_endpoint}}"
      ],
      "path": [
        "services",
        "data",
        "v{{version}}",
        "chatter",
        "feed-elements",
        ":FEED_ELEMENT_ID",
        "capabilities",
        "comments",
        "items"
      ],
      "query": [
        {
          "key": "text",
          "value": "New Comment"
        }
      ],
      "variable": [
        {
          "key": "FEED_ELEMENT_ID",
          "value": ""
        }
      ]
    },
    "description": "Access comments for a feed element, or add a comment to a feed element.\nTo upload a binary file to attach to a comment, you must send it in a multipart/form-data request. To send the text of the comment, you can choose to include a JSON or XML rich input body part in the multipart/form-data request. Alternately, you can choose to pass the information in request parameter parts. For information about how to create the multipart/form-data message, see Uploading Binary Files.\n\nhttps://developer.salesforce.com/docs/atlas.en-us.chatterapi.meta/chatterapi/connect_resources_feed_element_capability_comments_items.htm#connect_resources_feed_element_capability_comments_items"
  },
  "response": [
    {
      "name": "Feed Elements Capability, Comments Items",
      "originalRequest": {
        "method": "POST",
        "header": [
        ],
        "url": {
          "raw": "{{_endpoint}}/services/data/v{{version}}/chatter/feed-elements/:FEED_ELEMENT_ID/capabilities/comments/items?text=New Comment",
          "host": [
            "{{_endpoint}}"
          ],
          "path": [
            "services",
            "data",
            "v{{version}}",
            "chatter",
            "feed-elements",
            ":FEED_ELEMENT_ID",
            "capabilities",
            "comments",
            "items"
          ],
          "query": [
            {
              "key": "text",
              "value": "New Comment"
            }
          ],
          "variable": [
            {
              "key": "FEED_ELEMENT_ID",
              "value": "0D5..."
            }
          ]
        }
      },
      "status": "Created",
      "code": 201,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "Date",
          "value": "Wed, 22 Nov 2023 11:14:33 GMT"
        },
        {
          "key": "Strict-Transport-Security",
          "value": "max-age=63072000; includeSubDomains"
        },
        {
          "key": "X-Content-Type-Options",
          "value": "nosniff"
        },
        {
          "key": "X-XSS-Protection",
          "value": "1; mode=block"
        },
        {
          "key": "X-Robots-Tag",
          "value": "none"
        },
        {
          "key": "Cache-Control",
          "value": "no-cache,must-revalidate,max-age=0,no-store,private"
        },
        {
          "key": "Content-Type",
          "value": "application/json;charset=UTF-8"
        },
        {
          "key": "Vary",
          "value": "Accept-Encoding"
        },
        {
          "key": "Content-Encoding",
          "value": "gzip"
        },
        {
          "key": "Transfer-Encoding",
          "value": "chunked"
        }
      ],
      "cookie": [
      ],
      "body": "{\n    \"body\": {\n        \"isRichText\": false,\n        \"messageSegments\": [\n            {\n                \"text\": \"New Comment\",\n                \"type\": \"Text\"\n            }\n        ],\n        \"text\": \"New Comment\"\n    },\n    \"capabilities\": {\n        \"edit\": {\n            \"isEditRestricted\": false,\n            \"isEditableByMeUrl\": \"/services/data/v58.0/chatter/comments/0D7.../capabilities/edit/is-editable-by-me\",\n            \"lastEditedBy\": null,\n            \"lastEditedDate\": null,\n            \"latestRevision\": 1,\n            \"relativeLastEditedDate\": null\n        },\n        \"status\": {\n            \"feedEntityStatus\": \"Published\",\n            \"isApprovableByMe\": true\n        },\n        \"upDownVote\": {\n            \"downVoteCount\": 0,\n            \"myVote\": \"None\",\n            \"upVoteCount\": 0\n        },\n        \"verified\": {\n            \"isVerifiableByMe\": false,\n            \"isVerified\": false,\n            \"isVerifiedByAnonymized\": null,\n            \"lastVerifiedByUser\": null,\n            \"lastVerifiedDate\": null\n        }\n    },\n    \"clientInfo\": {\n        \"applicationName\": \"Postman Playground\",\n        \"applicationUrl\": null\n    },\n    \"createdDate\": \"2023-11-22T11:14:33.000Z\",\n    \"feedElement\": {\n        \"id\": \"0D5...\",\n        \"url\": \"/services/data/v58.0/chatter/feed-elements/0D5...\"\n    },\n    \"id\": \"0D7...\",\n    \"isDeleteRestricted\": false,\n    \"likes\": {\n        \"currentPageToken\": null,\n        \"currentPageUrl\": \"/services/data/v58.0/chatter/comments/0D7.../likes\",\n        \"items\": [],\n        \"nextPageToken\": null,\n        \"nextPageUrl\": null,\n        \"previousPageToken\": null,\n        \"previousPageUrl\": null,\n        \"total\": 0\n    },\n    \"likesMessage\": null,\n    \"moderationFlags\": null,\n    \"myLike\": null,\n    \"parent\": {\n        \"id\": \"001...\",\n        \"url\": \"/services/data/v58.0/chatter/records/001...\"\n    },\n    \"relativeCreatedDate\": \"Just now\",\n    \"threadLevel\": 0,\n    \"threadParentId\": null,\n    \"type\": \"TextComment\",\n    \"url\": \"/services/data/v58.0/chatter/comments/0D7...\",\n    \"user\": {\n        \"additionalLabel\": null,\n        \"communityNickname\": \"User1696423780773910041\",\n        \"companyName\": \"Salesforce\",\n        \"displayName\": \"Name\",\n        \"firstName\": \"Firstname\",\n        \"id\": \"005...\",\n        \"isActive\": true,\n        \"isInThisCommunity\": true,\n        \"lastName\": \"Name\",\n        \"motif\": {\n            \"color\": \"1B96FF\",\n            \"largeIconUrl\": \"/img/icon/profile64.png\",\n            \"mediumIconUrl\": \"/img/icon/profile32.png\",\n            \"smallIconUrl\": \"/img/icon/profile16.png\",\n            \"svgIconUrl\": null\n        },\n        \"mySubscription\": null,\n        \"name\": \"Name\",\n        \"outOfOffice\": {\n            \"message\": \"\"\n        },\n        \"photo\": {\n            \"fullEmailPhotoUrl\": \"https://<my_domain>/ncsphoto/1wsMlOd3tVC7boygqBO8wMT9KzA0D6tqzpbs-Uw0IogXzXAXaYKJnuWCNQmXymRq?fromEmail=1\",\n            \"largePhotoUrl\": \"https://<my_domain>/profilephoto/729.../F\",\n            \"mediumPhotoUrl\": \"https://<my_domain>/profilephoto/729.../M\",\n            \"photoVersionId\": \"729...\",\n            \"smallPhotoUrl\": \"https://<my_domain>/profilephoto/729.../T\",\n            \"standardEmailPhotoUrl\": \"https://<my_domain>/ncsphoto/1wsMlOd3tVC7boygqBO8wMT9KzA0D6tqzpbs-Uw0Ioi-dtynkoFWsl46as__TDFU?fromEmail=1\",\n            \"url\": \"/services/data/v58.0/connect/user-profiles/005.../photo\"\n        },\n        \"reputation\": null,\n        \"title\": null,\n        \"type\": \"User\",\n        \"url\": \"/services/data/v58.0/chatter/users/005...\",\n        \"userType\": \"Internal\"\n    }\n}"
    }
  ]
}