Asynchronous HTTP Upload

Demonstrates how to do an HTTP upload asynchronously in a background thread. The Chilkat Upload software is freeware and may be used in both commercial and non-commercial applications and websites.

The C# code to receive the upload at http://www.chilkatsoft.com/receiveUpload.aspx may be seen here: C# ASP.NET Code to Receive Upload

Download Chilkat .NET for 4.0 Framework

Download Chilkat .NET for 64-bit 4.0 Framework (x64)

Download Chilkat .NET for 2.0 / 3.5 Framework

Download Chilkat .NET for 64-bit 2.0 / 3.5 Framework (x64)

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim upload As New Chilkat.Upload()

'  Specify the page (ASP, ASP.NET, Perl, Python, Ruby, CGI, etc)
'  that will process the HTTP Upload.
upload.Hostname = "www.chilkatsoft.com"
upload.Path = "/receiveUpload.aspx"

'  Add one or more files to be uploaded.
upload.AddFileReference("file1","dude.gif")
upload.AddFileReference("file2","pigs.xml")
upload.AddFileReference("file3","sample.doc")

'  Begin the HTTP upload in a background thread:
Dim success As Boolean
success = upload.BeginUpload()
If (success <> true) Then
    MsgBox(upload.LastErrorText)
Else
    MsgBox("Files uploaded!")
End If


'  Wait for the upload to finish.
'  Print the progress as we wait...
While (upload.UploadInProgress = true)
    '  We can abort the upload at any point by calling:
    '  upload.AbortUpload();

    '  Display the percentage complete and the number of bytes uploaded so far..
    '  The total upload size will become set after the upload begins:
    TextBox1.Text = TextBox1.Text & upload.PercentUploaded _
         & "% " & upload.NumBytesSent & "/" _
         & upload.TotalUploadSize & vbCrLf

    '  Sleep 2/10ths of a second.
    upload.SleepMs(200)

End While

'  Did the upload succeed?
If (upload.UploadSuccess = true) Then
    MsgBox("Files uploaded!")
Else
    MsgBox(upload.LastErrorText)
End If