Chilkat Online Tools

VB6 / Salesforce Platform APIs / Update named credential

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 ChilkatHttp
Dim success As Long

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

' The following JSON is sent in the request body.

' {
'   "FullName": "MyNamedCredential",
'   "Metadata": {
'     "label": "My Named Credential",
'     "endpoint": "arn:aws:AWS_REGION:AWS_ACCOUNT_ID",
'     "principalType": "Anonymous",
'     "protocol": "NoAuthentication"
'   }
' }

Dim json As New ChilkatJsonObject
success = json.UpdateString("FullName","MyNamedCredential")
success = json.UpdateString("Metadata.label","My Named Credential")
success = json.UpdateString("Metadata.endpoint","arn:aws:AWS_REGION:AWS_ACCOUNT_ID")
success = json.UpdateString("Metadata.principalType","Anonymous")
success = json.UpdateString("Metadata.protocol","NoAuthentication")

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

Dim sbRequestBody As New ChilkatStringBuilder
success = json.EmitSb(sbRequestBody)

Dim resp As ChilkatHttpResponse
Set resp = http.PTextSb("PATCH","https://domain.com/services/data/v{{version}}/tooling/sobjects/NamedCredential/:NAMED_CREDENTIAL_ID",sbRequestBody,"utf-8","application/json",0,0)
If (http.LastMethodSuccess = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

Debug.Print resp.StatusCode
Debug.Print resp.BodyStr

Curl Command

curl -X PATCH
	-H "Authorization: Bearer <access_token>"
	-d '{
    "FullName": "MyNamedCredential",
    "Metadata": {
        "label": "My Named Credential",
        "endpoint" : "arn:aws:AWS_REGION:AWS_ACCOUNT_ID",
        "principalType" : "Anonymous",
        "protocol": "NoAuthentication" 
    }
}'
https://domain.com/services/data/v{{version}}/tooling/sobjects/NamedCredential/:NAMED_CREDENTIAL_ID

Postman Collection Item JSON

{
  "name": "Update named credential",
  "request": {
    "method": "PATCH",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "{\n    \"FullName\": \"MyNamedCredential\",\n    \"Metadata\": {\n        \"label\": \"My Named Credential\",\n        \"endpoint\" : \"arn:aws:AWS_REGION:AWS_ACCOUNT_ID\",\n        \"principalType\" : \"Anonymous\",\n        \"protocol\": \"NoAuthentication\" \n    }\n}",
      "options": {
        "raw": {
          "language": "json"
        }
      }
    },
    "url": {
      "raw": "{{_endpoint}}/services/data/v{{version}}/tooling/sobjects/NamedCredential/:NAMED_CREDENTIAL_ID",
      "host": [
        "{{_endpoint}}"
      ],
      "path": [
        "services",
        "data",
        "v{{version}}",
        "tooling",
        "sobjects",
        "NamedCredential",
        ":NAMED_CREDENTIAL_ID"
      ],
      "variable": [
        {
          "key": "NAMED_CREDENTIAL_ID",
          "value": null
        }
      ]
    }
  },
  "response": [
  ]
}