PowerBuilder

Demonstrate HttpRequest.RemoveAllParams

Demonstrates the effect of calling HttpRequest.RemoveAllParams. PowerBuilder

integer li_rc
oleobject loo_Req

loo_Req = create oleobject
li_rc = loo_Req.ConnectToNewObject("Chilkat.HttpRequest")
if li_rc < 0 then
    destroy loo_Req
    MessageBox("Error","Connecting to COM object failed")
    return
end if

loo_Req.HttpVerb = "POST"
loo_Req.Path = "/test123"
loo_Req.ContentType = "application/x-www-form-urlencoded"
loo_Req.AddParam("paramA","AAA")
loo_Req.AddParam("paramB","BBB")
loo_Req.AddParam("paramC","CCC")

Write-Debug loo_Req.GenerateRequestText()
Write-Debug "---------------"

// Generates: 

// 	POST /test123 HTTP/1.1
// 	Content-Type: application/x-www-form-urlencoded
// 	Host: domain
// 	Content-Length: 32
// 
// 	paramA=AAA&paramB=BBB&paramC=CCC
// 

// If we call RemoveAllParams, and then add some additional params,
// then the original params are gone, and only the new params exist.
loo_Req.RemoveAllParams()
loo_Req.AddParam("paramD","DDD")
loo_Req.AddParam("paramE","EEE")
loo_Req.AddParam("paramF","FFF")
Write-Debug loo_Req.GenerateRequestText()
Write-Debug "---------------"

// Generates:

// 	POST /test123 HTTP/1.1
// 	Content-Type: application/x-www-form-urlencoded
// 	Host: domain
// 	Content-Length: 32
// 
// 	paramD=DDD&paramE=EEE&paramF=FFF


destroy loo_Req