Xbase++

Read the REST Response Body into a StringBuilder

Demonstrates Rest.ReadRespSb, which reads the response body as text into a StringBuilder, replacing its previous contents.

Background. The staged request model separates sending from reading: a SendReq method transmits the request, ReadResponseHeader reads the status line and headers, and a ReadResp method reads the body. This gives fine control over large or streamed messages compared with the single-call full-request methods.

Chilkat Xbase++ Downloads

Download Chilkat for Xbase++

Xbase++

LOCAL nSuccess
LOCAL oRest
LOCAL nBTls
LOCAL nBAutoReconnect
LOCAL nStatusCode
LOCAL oSbResponse
LOCAL cResponseBody

nSuccess := 0

oRest := CreateObject("Chilkat.Rest")
nBTls := 1
nBAutoReconnect := 1
nSuccess := oRest:Connect("example.com", 443, nBTls, nBAutoReconnect)
IF (nSuccess == 0)
    ? oRest:LastErrorText
    oRest:destroy()
    RETURN
ENDIF

nSuccess := oRest:SendReqNoBody("GET", "/api/items/123")
IF (nSuccess == 0)
    ? oRest:LastErrorText
    oRest:destroy()
    RETURN
ENDIF

nStatusCode := oRest:ReadResponseHeader()
IF (nStatusCode < 0)
    ? oRest:LastErrorText
    oRest:destroy()
    RETURN
ENDIF

//  Read the response body as text into a StringBuilder, replacing its previous contents.
oSbResponse := CreateObject("Chilkat.StringBuilder")
nSuccess := oRest:ReadRespSb(oSbResponse)
IF (nSuccess == 0)
    ? oRest:LastErrorText
    oRest:destroy()
    oSbResponse:destroy()
    RETURN
ENDIF

cResponseBody := oSbResponse:GetAsString()
IF (oSbResponse:LastMethodSuccess == 0)
    ? oSbResponse:LastErrorText
    oRest:destroy()
    oSbResponse:destroy()
    RETURN
ENDIF

? cResponseBody

oRest:destroy()
oSbResponse:destroy()