DEPRECADO
O método ::Ok() não deve ser usado, pois foi substituído pela propriedade ::lOk.
O método ::Ok() retorna Verdadeiro (.T.) caso a operação mais recente tenha sido bem sucedida, ou .F. em caso contrário.
Sintaxe
lResult := oRedisClient::Ok()
Parâmetros
O método ::Ok() não usa nenhum parâmetro.
Retorno
| Nome | Tipo | Descrição | Observações |
|---|
lResult | lógico | Verdadeiro (.T.) a última operação do objeto tRedisClient tenha sido verdadeira; .F. em caso contrário. | |
Observações
- O método
::Ok() não deve ser usado, pois foi substituído pela propriedade ::lOk. - O método
::Ok() será eliminado em futuras versões da classe tRedisConnect.
Exemplos
Exemplo 1 – Teste de ::Ok() depois de tentativa de conexão
#include 'protheus.ch'
// Setup Redis
Static cRedisHost := "localhost"
Static nRedisPort := 6379
Static cRedisAuth := ""
User Function tstOk()
Local cMsg := ''
oRedisClient := tRedisClient():New()
ConOut( "Result of ::ok() after ::New(): " + cValToChar(oRedisClient:Ok()) )
oRedisClient:Connect(cRedisHost, nRedisPort, cRedisAuth)
ConOut("Result of ::ok() after ::Connect(): " + cValToChar(oRedisClient:Ok()) )
If oRedisClient:lConnected
ConOut("Successful connection.")
oRedisClient:Disconnect()
ConOut("The client disconnected from the server.")
ConOut("Result of ::ok() after ::Disconnect(): " + cValToChar(oRedisClient:Ok()) )
Return .T.
EndIf
cMsg := "Could not connect to the server " + cRedisHost + ", at port "
cMsg += cValToChar(nRedisPort) + ", with authentication '" + cRedisAuth + "'"
ConOut(cMsg)
Return .F.