PureBasic

Connect to a REST Server

Demonstrates Rest.Connect, which establishes the initial TCP (and optionally TLS) connection to a REST server. The example connects over HTTPS and then reuses the connection for a request.

Background. A single connection can serve many requests to the same host. The TLS argument should be _TRUE_ for HTTPS (typically port 443), and automatic reconnection lets Chilkat transparently re-establish a dropped keep-alive connection.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

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

    ;  The connection is now established and ready for requests.  A single connection can be reused for
    ;  many requests to the same server.
    responseText.s = CkRest::ckFullRequestNoBody(rest,"GET","/api/status")
    If CkRest::ckLastMethodSuccess(rest) = 0
        Debug CkRest::ckLastErrorText(rest)
        CkRest::ckDispose(rest)
        ProcedureReturn
    EndIf

    Debug responseText


    CkRest::ckDispose(rest)


    ProcedureReturn
EndProcedure