Back to Collection Items
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = CreateObject("Chilkat.Http")
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set queryParams = CreateObject("Chilkat.JsonObject")
success = queryParams.UpdateString("searchByRoomType","true")
http.SetRequestHeader "x-app-key","{{AppKey}}"
http.SetRequestHeader "x-hotelid","{{HotelId}}"
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
' resp is a Chilkat.HttpResponse
Set resp = http.QuickRequestParams("GET","https://domain.com/rsv/config/v0/hotels/{{HotelId}}/upsellRules",queryParams)
If (http.LastMethodSuccess = 0) Then
outFile.WriteLine(http.LastErrorText)
WScript.Quit
End If
outFile.WriteLine(resp.StatusCode)
outFile.WriteLine(resp.BodyStr)
outFile.Close
Curl Command
curl -G -d "searchByRoomType=true"
-H "Authorization: Bearer <access_token>"
-H "x-app-key: {{AppKey}}"
-H "x-hotelid: {{HotelId}}"
https://domain.com/rsv/config/v0/hotels/{{HotelId}}/upsellRules
Postman Collection Item JSON
{
"name": "Get existing upsell rules",
"request": {
"auth": {
"type": "bearer",
"bearer": [
{
"key": "token",
"value": "{{Token}}",
"type": "string"
}
]
},
"method": "GET",
"header": [
{
"key": "x-app-key",
"type": "text",
"value": "{{AppKey}}"
},
{
"key": "x-hotelid",
"type": "text",
"value": "{{HotelId}}"
}
],
"url": {
"raw": "{{HostName}}/rsv/config/v0/hotels/{{HotelId}}/upsellRules?searchByRoomType=true",
"host": [
"{{HostName}}"
],
"path": [
"rsv",
"config",
"v0",
"hotels",
"{{HotelId}}",
"upsellRules"
],
"query": [
{
"key": "searchByRoomType",
"value": "true"
}
]
}
},
"response": [
]
}