VB6 / Support API / Update a Sharing Agreement
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
http.BasicAuth = 1
http.Login = "login"
http.Password = "password"
http.SetRequestHeader "Accept","application/json"
Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequest("PUT","https://example.zendesk.com/api/v2/sharing_agreements/:sharing_agreement_id")
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Dim sbResponseBody As New ChilkatStringBuilder
success = resp.GetBodySb(sbResponseBody)
Dim jResp As New ChilkatJsonObject
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0
Debug.Print "Response Body:"
Debug.Print jResp.Emit()
Dim respStatusCode As Long
respStatusCode = resp.StatusCode
Debug.Print "Response Status Code = " & respStatusCode
If (respStatusCode >= 400) Then
Debug.Print "Response Header:"
Debug.Print resp.Header
Debug.Print "Failed."
Exit Sub
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
' {
' "sharing_agreement": {
' "created_at": "<dateTime>",
' "id": "<integer>",
' "name": "<string>",
' "partner_name": "<string>",
' "remote_subdomain": "<string>",
' "status": "<string>",
' "type": "<string>",
' "url": "<string>"
' }
' }
' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
Dim Created_at As String
Created_at = jResp.StringOf("sharing_agreement.created_at")
Dim Id As String
Id = jResp.StringOf("sharing_agreement.id")
Dim Name As String
Name = jResp.StringOf("sharing_agreement.name")
Dim Partner_name As String
Partner_name = jResp.StringOf("sharing_agreement.partner_name")
Dim Remote_subdomain As String
Remote_subdomain = jResp.StringOf("sharing_agreement.remote_subdomain")
Dim Status As String
Status = jResp.StringOf("sharing_agreement.status")
Dim v_Type As String
v_Type = jResp.StringOf("sharing_agreement.type")
Dim v_Url As String
v_Url = jResp.StringOf("sharing_agreement.url")
Curl Command
curl -u login:password -X PUT
-H "Accept: application/json"
https://example.zendesk.com/api/v2/sharing_agreements/:sharing_agreement_id
Postman Collection Item JSON
{
"name": "Update a Sharing Agreement",
"request": {
"method": "PUT",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/v2/sharing_agreements/:sharing_agreement_id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"v2",
"sharing_agreements",
":sharing_agreement_id"
],
"variable": [
{
"key": "sharing_agreement_id",
"value": "<integer>"
}
]
},
"description": "Returns an updated sharing agreement. Only `status` is allowed to be updated.\n\n#### Allowed For\n\n* Admins\n"
},
"response": [
{
"name": "Success response",
"originalRequest": {
"method": "PUT",
"header": [
{
"description": "Added as a part of security scheme: basic",
"key": "Authorization",
"value": "Basic <credentials>"
}
],
"url": {
"raw": "{{baseUrl}}/api/v2/sharing_agreements/:sharing_agreement_id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"v2",
"sharing_agreements",
":sharing_agreement_id"
],
"variable": [
{
"key": "sharing_agreement_id"
}
]
}
},
"status": "OK",
"code": 200,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"cookie": [
],
"body": "{\n \"sharing_agreement\": {\n \"created_at\": \"<dateTime>\",\n \"id\": \"<integer>\",\n \"name\": \"<string>\",\n \"partner_name\": \"<string>\",\n \"remote_subdomain\": \"<string>\",\n \"status\": \"<string>\",\n \"type\": \"<string>\",\n \"url\": \"<string>\"\n }\n}"
}
]
}