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("expensed-by[login]","eshwarpay")
queryParams.UpdateString("filter","default_expense_reports_filter")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim resp As Chilkat.HttpResponse = http.QuickRequestParams("GET","https://domain.com/expense_reports",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 "expensed-by[login]=eshwarpay"
-d "filter=default_expense_reports_filter"
-H "Authorization: Bearer <access_token>"
https://domain.com/expense_reports
Postman Collection Item JSON
{
"name": "Get Expense Reports - Using Expense By User",
"request": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{URL}}/expense_reports?expensed-by[login]=eshwarpay&filter=default_expense_reports_filter",
"host": [
"{{URL}}"
],
"path": [
"expense_reports"
],
"query": [
{
"key": "expensed-by[login]",
"value": "eshwarpay"
},
{
"key": "filter",
"value": "default_expense_reports_filter"
}
]
}
},
"response": [
]
}