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.UpdateInt("limit",20)
success = queryParams.UpdateInt("offset",0)
' Adds the "Authorization: Bearer {{token}}" header.
http.AuthToken = "{{token}}"
Dim resp As ChilkatHttpResponse
Set resp = http.QuickRequestParams("GET","https://domain.com/apimanager/api/v1/organizations/{{organization_id}}/custom-policy-templates",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 "limit=20"
-d "offset=0"
-H "Authorization: Bearer {{token}}"
https://domain.com/apimanager/api/v1/organizations/{{organization_id}}/custom-policy-templates
Postman Collection Item JSON
{
"name": "Get all custom policy-templates",
"request": {
"method": "GET",
"header": [
{
"key": "Authorization",
"value": "Bearer {{token}}",
"type": "text"
}
],
"url": {
"raw": "{{url}}/apimanager/api/v1/organizations/{{organization_id}}/custom-policy-templates?limit=20&offset=0",
"host": [
"{{url}}"
],
"path": [
"apimanager",
"api",
"v1",
"organizations",
"{{organization_id}}",
"custom-policy-templates"
],
"query": [
{
"key": "limit",
"value": "20"
},
{
"key": "offset",
"value": "0"
}
]
}
},
"response": [
]
}