Histórico da Página

...

Informações

Importante!!!

O Id informado NÃO é exclusivo para o fonte/função utilizado. Se o mesmo Id for informado em um fonte/função diferente, poderá existir um conflito.

Bloco de código

title	fonte1.prw
collapse	true

User Function teste1()

    Local cSenha:= 'minhasenha'
    Local cID      	:= 'MeuID'
    Local cDataRet	 := ""
    Local lSucesso := .T.
	Local oVault   := FwSecretVault():New()

    lSucesso := FwSecretVault()oVault:Put(cID, cSenha) // retorno .T.
 
return

User Function teste2()
	Local cSenha:= 'minhasenha'
    Local cID      	:= 'MeuID'
    Local cNovaSenha:= "novasenha"
    Local lSucesso := .T.
	Local oVault   := FwSecretVault():New()
    
    lSucesso := FwSecretVault()oVault:Put(cID, cNovaSenha) // retorno .F., pois já foi cadastrado
    lSucesso := FwSecretVault()oVault:Delete(cID)  // retorno .F., pois só pode ser deletado por outro fonte.
    lSucesso := FwSecretVault()oVault:Check(cID, cNovaSenha) // retorno .F., pois a senha cadastrada é outra
    lSucesso := FwSecretVault()oVault:Check(cID, cSenha) // retorno .T., pois a senha cadastrada foi essa
 
return

...

Bloco de código

language	delphi
theme	Midnight
title	Exemplo

User Function TstSafeVault()

    Local cSenha  	:= 'meu valor secreto com acentuação'
    Local cID      	:= 'MeuID'
    Local lSucesso  := .F. 
	Local oVault := FwSecretVault():New()
    
    lSucesso := FwSecretVault()oVault:Put(cID, cSenha) // lSucesso := .T.
    lSucesso := FwSecretVault()oVault:Check(cID, cSenha) // lSucesso := .T.
	lSucesso := FwSecretVault()oVault:Check(cID, "senhaerrada") // lSucesso := .F.
    lSucesso := FwSecretVault()oVault:Delete(cID) // lSucesso := .T.
    lSucesso := FwSecretVault()oVault:Check(cID) // lSucesso := .F., o registro já foi deletado
 
return

...

Páginas filhas

Versões comparadas

Versão antiga 3

Nova versão 4

Chave