Atribui um valor máximo de espera (ou timeout) para a recepção de mensagens vindas do servidor.
oRedisClient:SetRecvTimeout(nTimeInSeconds) |
O método ::SetRecvTimeout() é muito importante para aplicações críticas que dependam de tempo de resposta preciso; isto é: quanto o tempo o servidor Redis levará para responder. E também para uma aplicação que interaja com um servidor remoto, que pode até mesmo não responder, devido a perda de conexão com o programa cliente, que tenta disparar comandos no servidor.
Por ora o método ::SetRecvTimeout() não retorna um resultado, mas isto pode ser alterado em versões subsequentes da biblioteca.
#include 'protheus.ch'
// Setup Redis
Static cRedisHost := "tec-clima"
Static nRedisPort := 6379
Static cRedisAuth := ""
User Function redTst()
oRedisCli:= tRedisClient():New()
oRedisCli:Connect(cRedisHost, nRedisPort, cRedisAuth)
If oRedisCli:lConnected)
ConOut("Successful connection.")
// Sets timeout of server answers to 10 seconds
oRedisClient:SetRecvTimeout(10)
// TODO Redis store manipulation commands
oRdClient:Disconnect()
ConOut("The client was disconnected from the server.")
Return .T.
EndIf
Return .F. |