Xbase++ Requires Chilkat v11.0.0+

HTTPS PUT application/x-www-form-urlencoded

See more HTTP Examples

Demonstrates two ways of sending an HTTPS PUT application/x-www-form-urlencoded request. Xbase++

LOCAL nSuccess
LOCAL oHttp
LOCAL cUrl
LOCAL oResp
LOCAL oReq

nSuccess := 0

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

oHttp := CreateObject("Chilkat.Http")

//  The 1st example sends a PUT with the query params in the URL.
//  The body of the request will be empty.
cUrl := "https://example.com/leads/12345678?uid=XXXX&apikey=YYYYYY&notes=Test_Note"

//  Sends the following request:

//  PUT /leads/12345678?uid=XXXX&apikey=YYYYYY&notes=Test_Note HTTP/1.1
//  Host: example.com
//  Accept: */*
//  Accept-Encoding: gzip
//  Content-Length: 0
//  

oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpStr("PUT", cUrl, "", "", "application/x-www-form-urlencoded", oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oHttp:destroy()
    oResp:destroy()
    RETURN
ENDIF

? "Response status code = " + Str(oResp:StatusCode)
? "Response body: " + oResp:BodyStr

//  -----------------------------------------------------------------------
//  Now we send the same request, but instead the query params are in the HTTP request body.

oReq := CreateObject("Chilkat.HttpRequest")
oReq:HttpVerb := "PUT"
oReq:Path := "/leads/12345678"
oReq:AddParam("uid", "XXXX")
oReq:AddParam("apikey", "YYYYYY")
oReq:AddParam("notes", "Test_Note")

//  Sends the following request:

//  POST /leads/12345678 HTTP/1.1
//  Host: example.com
//  Content-Type: application/x-www-form-urlencoded
//  Content-Length: 38
//  
//  uid=XXXX&apikey=YYYYYY&notes=Test_Notereq.HttpVerb = "POST";
oReq:HttpVerb := "POST"
oReq:ContentType := "application/x-www-form-urlencoded"

nSuccess := oHttp:HttpReq("https://example.com/leads/12345678", oReq, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oHttp:destroy()
    oResp:destroy()
    oReq:destroy()
    RETURN
ENDIF

? "Response status code = " + Str(oResp:StatusCode)
? "Response body: " + oResp:BodyStr

oHttp:destroy()
oResp:destroy()
oReq:destroy()