(Lianja) HTTPS Upload File to Web Server

Uploads a file to a web server using HTTPS.

Chilkat Lianja Extension Download Chilkat Lianja Extension

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

// The ContentType, HttpVerb, and Path properties should
// always be explicitly set.
loReq = createobject("CkHttpRequest")
loReq.HttpVerb = "POST"
loReq.Path = "/receiveMyUpload.aspx"
loReq.ContentType = "multipart/form-data"

loReq.AddStringForUpload("fileA","fileA.txt","This is the contents of file A","utf-8")
llSuccess = loReq.AddFileForUpload("starfish.jpg","qa_data/jpg/starfish.jpg")
if (llSuccess <> .T.) then
    ? loReq.LastErrorText
    release loReq
    return
endif

loHttp = createobject("CkHttp")

// ----------------------------------------------------------------------------
// IMPORTANT:
// HTTP uploads require a counterpart implementation on the server, written in any desired language
// such as C#, Classic ASP, PHP, etc., which consumes the upload being sent.
// See: ASP.NET Receive Upload
// ----------------------------------------------------------------------------

// Do the upload.
llUseSslTls = .T.
loResp = loHttp.SynchronousRequest("www.example.com",443,llUseSslTls,loReq)
if (loHttp.LastMethodSuccess <> .T.) then
    ? loHttp.LastErrorText
    release loReq
    release loHttp
    return
endif

? "response status code = " + str(loResp.StatusCode)
? "response body:"
? loResp.BodyStr

release loResp


release loReq
release loHttp