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 Chilkat.Http
Dim success As Boolean
Dim queryParams As New Chilkat.JsonObject
queryParams.UpdateString("status","active")
queryParams.UpdateString("fields","[""id"",""number"",""status""]")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim resp As Chilkat.HttpResponse = http.QuickRequestParams("GET","https://domain.com/suppliers/",queryParams)
If (http.LastMethodSuccess = False) Then
Debug.WriteLine(http.LastErrorText)
Exit Sub
End If
Debug.WriteLine(resp.StatusCode)
Debug.WriteLine(resp.BodyStr)
Curl Command
curl -G -d "status=active"
-d "fields=%5B%22id%22,%22number%22,%22status%22%5D"
-H "Authorization: Bearer <access_token>"
https://domain.com/suppliers/
Postman Collection Item JSON
{
"name": "Get Supplier - using Status",
"request": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{URL}}/suppliers/?status=active&fields=[\"id\",\"number\",\"status\"]",
"host": [
"{{URL}}"
],
"path": [
"suppliers",
""
],
"query": [
{
"key": "status",
"value": "active"
},
{
"key": "fields",
"value": "[\"id\",\"number\",\"status\"]"
}
]
}
},
"response": [
]
}