Salvar certificado PEM, CER, KEY na base de dados

[leandroaoa]

Bom dia pessoal.

É possivel salvar os certificado PEM, CER, KEY em base de dados ? Estou implementando a APIPIX e estava vendo essa possibilidade ao inves de ter que levar os certificados pra distribuir junto a aplicacao

[Daniel Simoes]

Sim.. é um arquivo Binário como qualquer outro ..

Salve em um Blob

[leandroaoa]

11 horas atrás, Daniel Simoes disse:

Sim.. é um arquivo Binário como qualquer outro ..

Salve em um Blob

boa noite Daniel no meu teste nao deu certo salvando no banco. se eu passar o caminho da certo agora salvando no banco da erro 500

Olha como estou fazendo

estou usando essa funcao pra salvar no banco MYSQL

function LerCertificado(pCaminho: string): AnsiString;
var
  vFile: TFileStream;
begin
  vFile := TFileStream.Create(pCaminho, fmOpenRead);
  try
    Result := EncodeBase64(ReadStrFromStream(vFile, vFile.Size));
  finally
    vFile.Free;
  end;
end;

    dm1.sqldataset1.close;
    dm1.sqldataset1.sql.text:='update config_pix set certificado_cer=:certificado';
    dm1.sqldataset1.parambyname('certificado').AsAnsiString  := LerCertificado(lCaminho);//trim(destino);
    dm1.sqldataset1.ExecSQL;
 

  ACBrPixCD1.PSP                      := ACBrPSPSicredi1;
  ACBrPSPSicredi1.ChavePIX            := aDataSet.FieldByName('chavepix').AsString;
  ACBrPSPSicredi1.ClientID            := aDataSet.FieldByName('clientid').AsString;
  ACBrPSPSicredi1.ClientSecret        := aDataSet.FieldByName('clientsecret').AsString;
  ACBrPSPSicredi1.ArquivoChavePrivada := FDir+aDataSet.FieldByName('chave_privada').AsString;
  ACBrPSPSicredi1.ArquivoCertificado  := DecodeBase64(aDataSet.FieldByName('certificado_cer').AsAnsiString);
 

[leandroaoa]

@Daniel Simoes Bom dia. deu certo aqui eu que passei os dados errado obrigado ai pela ajuda pode fechar o topico 

ACBrPSPSicredi1.Certificado  := DecodeBase64(aDataSet.FieldByName('certificado_cer').AsAnsiString);

[Daniel Simoes]

Isso mesmo... a ArquivoCertificado, espera um "Path"

[Alexandre de Paula]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.