(Tcl) Upload Files to a Web Server - Simplest TLS Example

This is the simplest example for uploading some files to a web server using SSL/TLS. the BlockingUpload call is synchronous and returns when the upload is finished (or failed).

A server-side C# example showing how to receive an upload is located at C# ASP.NET Code to Receive Upload

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

set upload [new_CkUpload]

# Specify the page (ASP, ASP.NET, Perl, Python, Ruby, CGI, etc)
# that will receive and process the HTTPS Upload.
CkUpload_put_Hostname $upload "www.mywebserver.com"
CkUpload_put_Path $upload "/receiveUpload.aspx"

# Make sure to indicate that TLS is to be used, and the port should be
# 443 rather than 80.
CkUpload_put_Ssl $upload 1
CkUpload_put_Port $upload 443

# Add one or more files to be uploaded.
CkUpload_AddFileReference $upload "file1" "dude.gif"
CkUpload_AddFileReference $upload "file2" "swordfish.xml"
CkUpload_AddFileReference $upload "file3" "sample.doc"

# Do the upload.  The method returns when the upload
# is completed.
# This component also includes asynchronous upload capability,
# which is demonstrated in another example.
set success [CkUpload_BlockingUpload $upload]
if {$success != 1} then {
    puts [CkUpload_lastErrorText $upload]
} else {
    puts "Files uploaded!"
}


delete_CkUpload $upload