AutoIt

HTTP multipart/form-data Upload

See more HTTP Examples

Demonstrates how to upload files to an HTTP server using a multipart/form-data POST. AutoIt

Local $bSuccess = False

;  This example requires the Chilkat API to have been previously unlocked.
;  See Global Unlock Sample for sample code.

$oHttp = ObjCreate("Chilkat.Http")

$oReq = ObjCreate("Chilkat.HttpRequest")
$oReq.HttpVerb = "POST"
$oReq.ContentType = "multipart/form-data"
$oReq.Path = "rcvFormDataUpload.aspx"

;  Send an "Expect: 100-continue" header in the request.
;  This causes the HTTP server to end a 100-continue response
;  immediately after receiving the HTTP header.  The client
;  (Chilkat) will receive this intermediate response, and if
;  it's not an error response, it knows that the HTTP server will
;  accept the data that is forthcoming.
;  The alternative is to get an error response after trying to upload
;  the entire contents of the files.
$oReq.AddHeader "Expect","100-continue"

;  Call AddFileForUpload2 for each file to be uploaded in the HTTP multipart/form-data POST
;  To allow Chilkat to determine the content-type automatically based on file-extension,
;  call AddFileForUpload instead.

;  The 1st arg is the filename passed in the HTTP request.
;  The 2nd arg is the path in the local filesytem.
;  The file is not loaded into memory.  It is streamed directly from the file
;  when the HTTP POST is sent.
$bSuccess = $oReq.AddFileForUpload2("starfish.jpg","c:/qa_data/starfish.jpg","image/jpg")
If ($bSuccess = False) Then
    ConsoleWrite($oReq.LastErrorText & @CRLF)
    Exit
EndIf

$bSuccess = $oReq.AddFileForUpload("something.pdf","c:/qa_data/something.pdf")
If ($bSuccess = False) Then
    ConsoleWrite($oReq.LastErrorText & @CRLF)
    Exit
EndIf

;  Its also possible to add a file from a string:
$bSuccess = $oReq.AddStringForUpload("test.xml","test.xml","<abc>This is the test.xml content</abc>","utf-8")
;  We'll assume success since no files are involved..

;  This sends the HTTP request (with 3 files being uploaded) to
;  http://www.mywebserver123abc.com/rcvFormDataUpload.aspx
$oResp = ObjCreate("Chilkat.HttpResponse")
$bSuccess = $oHttp.HttpSReq("www.mywebserver123abc.com",80,False,$oReq,$oResp)
If ($bSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("HTTP response status: " & $oResp.StatusCode & @CRLF)
;  See the online reference documentation for 
;  other information that can be obtained from the response object.

;  To send using SSL/TLS, do this instead.
;  This sends to https://www.mywebserver123abc.com/rcvFormDataUpload.aspx
$bSuccess = $oHttp.HttpSReq("www.mywebserver123abc.com",443,True,$oReq,$oResp)
If ($bSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("HTTP response status: " & $oResp.StatusCode & @CRLF)
;  See the online reference documentation for 
;  other information that can be obtained from the response object.