Histórico da Página

...

function u_KVisConn()

  local oKVClient := tTecKVClient():New()
  local cSrv      := '12.172.72.72'
  local nPort     := 6379
  local cMsg      := ""

  oKVClient:KVOpenConn(cSrv,nPort)

  cMsg := "KV " + cPort + ":" + cValToChar(nPort) + " "
  if ( oKVClient:KVIsConnected() )
    cMsg += "conectado"
  else
    cMsg += "desconectado" )
  endif
  cMsg += "!"
  conout( cMsg )

  oKVClient:Finish()  // <- Nao esquecer
return

...