Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Esta função retorna uma instância da Classe FWSecretVault, preparada para validar se os valores informados estão de acordo com as Regras de Preenchimento de senha ( Política de Segurança ). 

A regra de preenchimento Inibir repetição de parte da senha, só é aplicada quando um usuário troca a senha no logon e informa a senha antiga e a nova. Como não é possível saber os conteúdos das senhas armazenadas essa regra não é aplicada.

...

Bloco de código
languagedelphi
themeMidnight
titleExemplo
// Chamar a função depois de montarabrir o ambiente ou de dentro de um menu do sistema.

User Function TstPswVault()

    Local cPass  	:= 'minhasenha'
    Local cID      	:= 'MeuID'
    Local lSucesso  := .F. 
    Local aMessage  := {}
	Local oVault := MPPswVault(aMessage)
    
    lSucesso := oVault:Put(cID, cPass) // lSucesso := .T.
    lSucesso := oVault:Check(cID, cPass) // lSucesso := .T.
	lSucesso := oVault:Put(cID, "123456") // lSucesso := .F. quando a política não permitir sequência numérica
	
    if !lSucesso .And. !Empty(aMessage)
		ConOut( aMessage[1], aMessage[2] )
	endif

    lSucesso := oVault:Delete(cID) // lSucesso := .T.
    lSucesso := oVault:Check(cID) // lSucesso := .F., o registro já foi deletado
 
return

...