Xbase++ Requires Chilkat v11.0.0+

URL Encoding Charset in POST Query Params

See more HTTP Examples

Demonstrates how to control the URL encoding charset in POST query params. Xbase++

LOCAL nSuccess
LOCAL cNameWin1252Encoded
LOCAL oSb
LOCAL oHttp
LOCAL oReq
LOCAL oResp

nSuccess := 0

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

//  We have the string "MÆRSK".
cNameWin1252Encoded := "M%E6RSK"

oSb := CreateObject("Chilkat.StringBuilder")
nSuccess := oSb:DecodeAndAppend(cNameWin1252Encoded, "url", "windows-1252")

oHttp := CreateObject("Chilkat.Http")

//  We're setting the session log filename so we can see the exact request sent.
oHttp:SessionLogFilename := "qa_output/sessionLog.txt"

//  First demonstrate a simple application/x-www-form-urlencoded POST

oReq := CreateObject("Chilkat.HttpRequest")

//  Set the Charset = "utf-8" to cause URL encoding to use utf-8.
oReq:Charset := "utf-8"

oReq:AddParam("name", oSb:GetAsString())

oReq:HttpVerb := "POST"
oReq:ContentType := "application/x-www-form-urlencoded"

oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpReq("https://www.chilkatsoft.com/something", oReq, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oSb:destroy()
    oHttp:destroy()
    oReq:destroy()
    oResp:destroy()
    RETURN
ENDIF

//  This is the request that is sent:
//  Notice that utf-8 is used in the query param (the letter 'Æ' is %C3%A6)

//  	POST /something HTTP/1.1
//  	Host: www.chilkatsoft.com
//  	Content-Type: application/x-www-form-urlencoded
//  	Content-Length: 15
//  
//  	name=M%C3%A6RSK

//  ---------------------------------------------------------------
//  Switch to windows-1252

oReq:Charset := "windows-1252"
oReq:HttpVerb := "POST"
oReq:ContentType := "application/x-www-form-urlencoded"

nSuccess := oHttp:HttpReq("https://www.chilkatsoft.com/something", oReq, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oSb:destroy()
    oHttp:destroy()
    oReq:destroy()
    oResp:destroy()
    RETURN
ENDIF

//  This is the request that is sent:
//  Notice that windows-1252 is used in the query param (the letter 'Æ' is %E6)

//  	POST /something HTTP/1.1
//  	Host: www.chilkatsoft.com
//  	Content-Type: application/x-www-form-urlencoded
//  	Content-Length: 12
//  
//  	name=M%E6RSK

//  ---------------------------------------------------------------
//  Let's do the same with HttpSReq, switching back to utf-8

oReq:Path := "/something"
oReq:HttpVerb := "POST"
oReq:ContentType := "application/x-www-form-urlencoded"

oReq:Charset := "utf-8"
nSuccess := oHttp:HttpSReq("www.chilkatsoft.com", 443, 1, oReq, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oSb:destroy()
    oHttp:destroy()
    oReq:destroy()
    oResp:destroy()
    RETURN
ENDIF

//  This is the request that is sent:
//  Notice that utf-8 is used in the query param (the letter 'Æ' is %C3%A6)

//  	POST /something HTTP/1.1
//  	Host: www.chilkatsoft.com
//  	Content-Type: application/x-www-form-urlencoded
//  	Content-Length: 15
//  
//  	name=M%C3%A6RSK

//  ---------------------------------------------------------------
//  Let's do a POST with XML body where the query params are in the HTTP request start line, 
//  and the Content-Type is text/xml where the body of the request is XML.

oReq:Path := "/something"
oReq:HttpVerb := "POST"
oReq:ContentType := "text/xml"
nSuccess := oReq:LoadBodyFromString("<test>123</test>", "utf-8")
oReq:Charset := "utf-8"

//  Remember... our request object still contains the query param added in the above call to AddParam.
nSuccess := oHttp:HttpSReq("www.chilkatsoft.com", 443, 1, oReq, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oSb:destroy()
    oHttp:destroy()
    oReq:destroy()
    oResp:destroy()
    RETURN
ENDIF

//  This is the request that is sent:
//  Notice that utf-8 is used in the query param (the letter 'Æ' is %C3%A6)

//  	POST /something?name=M%C3%A6RSK HTTP/1.1
//  	Host: www.chilkatsoft.com
//  	Content-Type: text/xml
//  	Content-Length: 16
//  
//  	<test>123</test>

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