VB6 / Support API / Show Target Failure
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 sbResponseBody As New ChilkatStringBuilder
success = http.QuickGetSb("https://example.zendesk.com/api/v2/target_failures/:target_failure_id",sbResponseBody)
If (success = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
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 = http.LastStatus
Debug.Print "Response Status Code = " & respStatusCode
If (respStatusCode >= 400) Then
Debug.Print "Response Header:"
Debug.Print http.LastHeader
Debug.Print "Failed."
Exit Sub
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
' {
' "target_failure": {
' "consecutive_failure_count": "<integer>",
' "created_at": "<dateTime>",
' "id": "<integer>",
' "raw_request": "<string>",
' "raw_response": "<string>",
' "status_code": "<integer>",
' "target_name": "<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 Consecutive_failure_count As String
Consecutive_failure_count = jResp.StringOf("target_failure.consecutive_failure_count")
Dim Created_at As String
Created_at = jResp.StringOf("target_failure.created_at")
Dim Id As String
Id = jResp.StringOf("target_failure.id")
Dim Raw_request As String
Raw_request = jResp.StringOf("target_failure.raw_request")
Dim Raw_response As String
Raw_response = jResp.StringOf("target_failure.raw_response")
Dim Status_code As String
Status_code = jResp.StringOf("target_failure.status_code")
Dim Target_name As String
Target_name = jResp.StringOf("target_failure.target_name")
Dim v_Url As String
v_Url = jResp.StringOf("target_failure.url")
Curl Command
curl -u login:password -X GET
-H "Accept: application/json"
https://example.zendesk.com/api/v2/target_failures/:target_failure_id
Postman Collection Item JSON
{
"name": "Show Target Failure",
"request": {
"method": "GET",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/v2/target_failures/:target_failure_id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"v2",
"target_failures",
":target_failure_id"
],
"variable": [
{
"key": "target_failure_id",
"value": "<integer>"
}
]
},
"description": "#### Stability\n\n* Development\n\n#### Allowed For\n\n* Admins\n"
},
"response": [
{
"name": "Success response",
"originalRequest": {
"method": "GET",
"header": [
{
"description": "Added as a part of security scheme: basic",
"key": "Authorization",
"value": "Basic <credentials>"
}
],
"url": {
"raw": "{{baseUrl}}/api/v2/target_failures/:target_failure_id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"v2",
"target_failures",
":target_failure_id"
],
"variable": [
{
"key": "target_failure_id"
}
]
}
},
"status": "OK",
"code": 200,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"cookie": [
],
"body": "{\n \"target_failure\": {\n \"consecutive_failure_count\": \"<integer>\",\n \"created_at\": \"<dateTime>\",\n \"id\": \"<integer>\",\n \"raw_request\": \"<string>\",\n \"raw_response\": \"<string>\",\n \"status_code\": \"<integer>\",\n \"target_name\": \"<string>\",\n \"url\": \"<string>\"\n }\n}"
}
]
}