(Lianja) Get the LastErrorText for an Asynchronous Method Call

See more Async Examples

Chilkat Lianja Extension Download Chilkat Lianja Extension

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loSocket = createobject("CkSocket")

// The Async call simply creates the task.  The "Connect" method has not yet been called.
lnMaxWaitMs = 5000
// Let's intentionally cause this connect to fail by giving it an invalid domain..
loTask = loSocket.ConnectAsync("amazonbladflakjsdflksadjf.com",443,.T.,lnMaxWaitMs)
if (loSocket.LastMethodSuccess = .F.) then
    ? loSocket.LastErrorText
    release loSocket
    return
endif

// Start the background thread to run the task.
llSuccess = loTask.Run()
if (not llSuccess) then
    ? loTask.LastErrorText
    release loTask
    release loSocket
    return
endif

// The application is now free to do anything else

// For this example, we'll simply sleep and periodically
// check to see if the Socket Connect if finished.
do while loTask.Finished <> .T.
    // Sleep 1 ms.
    loTask.SleepMs(1)
enddo

// If the task completed, it means the method (in this case the Connect method) was called and returned success or failure.
if (loTask.StatusInt <> 7) then
    ? "Task did not complete."
    ? "task status: " + loTask.Status
    release loTask
    release loSocket
    return
endif

// Get the success/failure of the Connect
// (This is the return value of the Connect method had it been called synchronously)
llSuccess = loTask.GetResultBool()
if (llSuccess = .F.) then
    // Get the LastErrorText for the Connect method call.
    // Had we called Connect synchronously, we would've simply accessed the socket object's LastErrorText property.
    // Instead, we get the task object's ResultErrorText.
    ? loTask.ResultErrorText
else
    ? "Connect succeeded."
endif

release loTask


release loSocket