Visual FoxPro

Add Data to multipart/form-data Request

See more HTTP Examples

Demonstrates how to add content (such as a JPG, PDF, XML, etc.) to multipart/form-data requests. Visual FoxPro

LOCAL lnSuccess
LOCAL loReq
LOCAL loBd

lnSuccess = 0

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

loReq = CreateObject('Chilkat.HttpRequest')
loReq.HttpVerb = "POST"
loReq.ContentType = "multipart/form-data"
loReq.Path = "/xyz/something"

loReq.AddParam("param1","value1")
loReq.AddParam("param2","value2")

*  Add some small files to the request. (Small so we can see what the full request looks like without too much data..)
loBd = CreateObject('Chilkat.BinData')
lnSuccess = loBd.LoadFile("qa_data/jpg/starfish20.jpg")
loReq.AddBdForUpload("starfish20","starfish20.jpg",loBd,"image/jpeg")

lnSuccess = loBd.LoadFile("qa_data/pdf/helloWorld.pdf")
loReq.AddBdForUpload("helloWorld","helloWorld.pdf",loBd,"application/pdf")

lnSuccess = loBd.LoadFile("qa_data/xml/tinyA.xml")
loReq.AddBdForUpload("tinyA","tinyA.xml",loBd,"text/xml")

*  This HTTP request contains binary data, so we cannot call GenerateRequestText
*  to examine it as a string.  We can instead call GenerateRequestFile
*  to write the request to a file and then examine using a hex editor,
*  or an editor that is capable of handling null bytes and non-printable chars (perhaps by displaying "?" chars instead).
loReq.GenerateRequestFile("qa_output/multipartFormDataRequest.bin")

? "OK."

*  This is the HTTP multipart/form-data request built by the above code:

*  POST /xyz/something HTTP/1.1
*  Host: domain
*  Content-Type: multipart/form-data; boundary=------------090708030009010000030901
*  Content-Length: 2220
*  
*  --------------090708030009010000030901
*  Content-Disposition: form-data; name="param1"
*  
*  value1
*  --------------090708030009010000030901
*  Content-Disposition: form-data; name="param2"
*  
*  value2
*  --------------090708030009010000030901
*  Content-Disposition: form-data; name="starfish20"; filename="starfish20.jpg"
*  Content-Type: image/jpeg
*  
*  JPEG DATA HERE...
*  --------------090708030009010000030901
*  Content-Disposition: form-data; name="helloWorld"; filename="helloWorld.pdf"
*  Content-Type: application/pdf
*  
*  PDF DATA HERE...
*  --------------090708030009010000030901
*  Content-Disposition: form-data; name="tinyA"; filename="tinyA.xml"
*  Content-Type: text/xml
*  
*  XML DATA HERE...
*  --------------090708030009010000030901--
*

RELEASE loReq
RELEASE loBd