Tcl
Tcl
Download a Binary REST Response into BinData
See more REST Examples
Demonstrates Rest.FullRequestNoBodyBd, which sends a request with no body and stores the binary response body in a BinData.
The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.
Background. This method is appropriate when the response is binary, such as an image or file download, allowing the received bytes to be saved or processed directly.
Chilkat Tcl Downloads
load ./chilkat.dll
set success 0
set rest [new_CkRest]
set bTls 1
set bAutoReconnect 1
set success [CkRest_Connect $rest "example.com" 443 $bTls $bAutoReconnect]
if {$success == 0} then {
puts [CkRest_lastErrorText $rest]
delete_CkRest $rest
exit
}
# The file paths are relative to the application's current working directory. Absolute paths
# may also be used. Supply the paths appropriate to your own environment.
# FullRequestNoBodyBd sends a request with no body and stores the binary response body in a
# BinData. This is appropriate when the response is binary, such as an image or file download.
set bdResponse [new_CkBinData]
set success [CkRest_FullRequestNoBodyBd $rest "GET" "/api/images/1" $bdResponse]
if {$success == 0} then {
puts [CkRest_lastErrorText $rest]
delete_CkRest $rest
delete_CkBinData $bdResponse
exit
}
set bSaved [CkBinData_WriteFile $bdResponse "qa_output/image.png"]
if {$bSaved != 1} then {
puts "Failed to save the response body."
delete_CkRest $rest
delete_CkBinData $bdResponse
exit
}
puts "Downloaded [CkBinData_get_NumBytes $bdResponse] bytes."
delete_CkRest $rest
delete_CkBinData $bdResponse