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
Dim queryParams As New ChilkatJsonObject
success = queryParams.UpdateString("module","Calls")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequestParams("GET","https://domain.com/crm/v2.1/settings/fields",queryParams)
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Debug.Print resp.StatusCode
Debug.Print resp.BodyStr
Curl Command
curl -G -d "module=Calls"
-H "Authorization: Bearer <access_token>"
https://domain.com/crm/v2.1/settings/fields
Postman Collection Item JSON
{
"name": "Calls",
"request": {
"auth": {
"type": "bearer",
"bearer": [
{
"key": "token",
"value": "{{access-token}}",
"type": "string"
}
]
},
"method": "GET",
"header": [
],
"url": {
"raw": "{{api-domain}}/crm/v2.1/settings/fields?module=Calls",
"host": [
"{{api-domain}}"
],
"path": [
"crm",
"v2.1",
"settings",
"fields"
],
"query": [
{
"key": "module",
"value": "Calls"
}
]
},
"description": "To get the metadata of the Calls module."
},
"response": [
]
}