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("q","Account,Contact")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
http.SetRequestHeader "Content-Type","application/json"
Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequestParams("GET","https://domain.com/services/data/v{{version}}/compactLayouts",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 "q=Account,Contact"
-H "Authorization: Bearer <access_token>"
-H "Content-Type: application/json"
https://domain.com/services/data/v{{version}}/compactLayouts
Postman Collection Item JSON
{
"name": "Compact Layouts",
"request": {
"method": "GET",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"url": {
"raw": "{{_endpoint}}/services/data/v{{version}}/compactLayouts?q=Account,Contact",
"host": [
"{{_endpoint}}"
],
"path": [
"services",
"data",
"v{{version}}",
"compactLayouts"
],
"query": [
{
"key": "q",
"value": "Account,Contact",
"description": "object list"
}
]
},
"description": "Returns a list of compact layouts for multiple objects. This resource is available in REST API version 31.0 and later."
},
"response": [
]
}