(DataFlex) Demonstrate HttpRequest.RemoveAllParams

Demonstrates the effect of calling HttpRequest.RemoveAllParams.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoReq
    String sTemp1

    Get Create (RefClass(cComChilkatHttpRequest)) To hoReq
    If (Not(IsComObjectCreated(hoReq))) Begin
        Send CreateComObject of hoReq
    End

    Set ComHttpVerb Of hoReq To "POST"
    Set ComPath Of hoReq To "/test123"
    Set ComContentType Of hoReq To "application/x-www-form-urlencoded"
    Send ComAddParam To hoReq "paramA" "AAA"
    Send ComAddParam To hoReq "paramB" "BBB"
    Send ComAddParam To hoReq "paramC" "CCC"

    Get ComGenerateRequestText Of hoReq To sTemp1
    Showln sTemp1
    Showln "---------------"

    // 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.
    Send ComRemoveAllParams To hoReq
    Send ComAddParam To hoReq "paramD" "DDD"
    Send ComAddParam To hoReq "paramE" "EEE"
    Send ComAddParam To hoReq "paramF" "FFF"
    Get ComGenerateRequestText Of hoReq To sTemp1
    Showln sTemp1
    Showln "---------------"

    // Generates:

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


End_Procedure