Como verificar a validade do Certificado no Trunk2 do ACBr?

DAVID CANDIDO DA SILVA

DAVID CANDIDO DA SILVA Publicado 17/11/2017 


Oi pessoal, está é uma dúvida muito recorrente para o pessoal que está
migrando do trunk para o Trunk2 do ACBr.

No tunk, para verificar a validade do certificado com a versão capicom
era usado o seguinte código, por exemplo:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(FormatDateTime('dd/mm/yyyy', ACBrNFe1.Configuracoes.Certificados.DataVenc));
end;


Lembrando que só funcionava para a versão Capicom.

Agora no Trunk2, podemos usar o seguinte código:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(FormatDateTime('dd/mm/yyyy', ACBrNFe1.SSL.CertDataVenc));
end;


E funciona com qualquer SSLLib que você apontar para o componente!

Para mais detalhes, você pode dar uma conferida nos exemplos
que acompanham os fontes do componente.

 

Voltar ao topo