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
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim sbResponseBody As New ChilkatStringBuilder
success = http.QuickGetSb("https://domain.com/services/data/",sbResponseBody)
If (success = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Debug.Print "Response status code = " & http.LastStatus
Debug.Print sbResponseBody.GetAsString()
Curl Command
curl -X GET
-H "Authorization: Bearer <access_token>"
https://domain.com/services/data/
Postman Collection Item JSON
{
"name": "Get Latest Release Version",
"event": [
{
"listen": "test",
"script": {
"exec": [
"const context = pm.environment.name ? pm.environment : pm.collectionVariables;",
"",
"const statusCode = responseCode.code;",
"tests[\"Response code - Expected: 200 & Actual: \" + statusCode] = statusCode == 200;",
"if(statusCode == 200){",
" const jsonData = JSON.parse(responseBody);",
" context.set(\"version\", jsonData[jsonData.length-1].version);",
"}"
],
"type": "text/javascript"
}
},
{
"listen": "prerequest",
"script": {
"exec": [
""
],
"type": "text/javascript"
}
}
],
"request": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{_endpoint}}/services/data/",
"host": [
"{{_endpoint}}"
],
"path": [
"services",
"data",
""
]
}
},
"response": [
]
}