DEPRECADO

O método ::Ok() não deve ser usado, pois foi substituído pela propriedade ::lOk.

Sintaxe

lResult := oRedisClient::Ok()

Parâmetros

O método ::Ok() não usa nenhum parâmetro.

Retorno

NomeTipoDescriçãoObservações
lResultlógicoVerdadeiro (.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 := ''
 
  oRedisCli := tRedisClient():New()
  oRedisCli:Connect(cRedisHost, nRedisPort, cRedisAuth)
 
  If oRedisCli:lConnected)
    ConOut("Successful connection.")
 
    oRdClient:Disconnect()
    ConOut("The client disconnected from the server.")
    Return .T.
  EndIf
 
  cMsg := "Could not connect to the server " + cRedisHost + ", at port "
  cMsg += cValToChar(nRedisPort) + ", with authentication '" + cRedisAuth + "'"
  ConOut(cMsg)
 
Return .F.



Veja também