Clear All Request Headers on a REST Object

See more REST Examples

Demonstrates Rest.ClearAllHeaders, which removes every request header previously added to the object.

IncludeFile "CkRest.pb"

Procedure ChilkatExample()

    success.i = 0

    rest.i = CkRest::ckCreate()
    If rest.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ;  Connect to the REST server.  The 3rd argument enables TLS (use 1 for HTTPS on port 443),
    ;  and the 4th enables automatic reconnection if the connection is dropped between requests.
    bTls.i = 1
    bAutoReconnect.i = 1
    success = CkRest::ckConnect(rest,"example.com",443,bTls,bAutoReconnect)
    If success = 0
        Debug CkRest::ckLastErrorText(rest)
        CkRest::ckDispose(rest)
        ProcedureReturn
    EndIf

    CkRest::ckAddHeader(rest,"Accept","application/json")
    CkRest::ckAddHeader(rest,"X-Custom-Header","example-value")

    ;  Remove all request headers previously added to this object, for example before reusing the same
    ;  Rest object for a different request.
    CkRest::ckClearAllHeaders(rest)

    Debug "All request headers cleared."


    CkRest::ckDispose(rest)


    ProcedureReturn
EndProcedure