Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Tcl) HTTP POST x-www-form-urlencodedDemonstrates how to send a simple x-www-form-urlencoded POST.
load ./chilkat.dll set http [new_CkHttp] set jsonStr "{ some json ... }" set req [new_CkHttpRequest] # This query parameter just happens to be named "json" and contains JSON text. CkHttpRequest_AddParam $req "json" $jsonStr # We can optionally add more query parameters. CkHttpRequest_AddParam $req "abc" "123" CkHttpRequest_AddParam $req "xml" "<abc>123</abc>" # Note: Just because we passed a query param named "json" or "xml" means nothing special. It's still just # a name=value query parameter.. # resp is a CkHttpResponse set resp [CkHttp_PostUrlEncoded $http "http://example.com/xyz/connect/report" $req] if {[CkHttp_get_LastMethodSuccess $http] != 1} then { puts [CkHttp_lastErrorText $http] delete_CkHttp $http delete_CkHttpRequest $req exit } if {[CkHttpResponse_get_StatusCode $resp] != 200} then { puts "Hey, I didn't receive the expected response status code!" puts "status code = [CkHttpResponse_get_StatusCode $resp]" } # Could be error text if the status code wasn't what we expected, or could be the response # body you're seeking.. set responseBody [CkHttpResponse_bodyStr $resp] puts "$responseBody" set fac [new_CkFileAccess] set filepath "some file path" set success [CkFileAccess_WriteEntireTextFile $fac $filepath $responseBody "utf-8" 0] if {$success != 1} then { puts [CkFileAccess_lastErrorText $fac] } delete_CkHttp $http delete_CkHttpRequest $req delete_CkFileAccess $fac |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.