senha do certificado

[antonio]

Estou testando o AcBR,

coloquei a senha do certificado na linha ACBrcte1.Configuracoes.Certificados.Senha := trim(edtsenha.text) ;

percebi que a senha é requisitada nesta linha:

dsigKey := xmldsig.createKeyFromCSP(PrivateKey.ProviderType, PrivateKey.ProviderName, PrivateKey.ContainerName, 0);

Porém a senha só é passada mais embaixo, na linha:

CryptSetProvParam(hCryptProvider, PP_SIGNATURE_PIN, LPBYTE(FSenhaCert), 0);

Então eis minha questão: Como é possível assinar já passando a senha, sem a necessidade de pedir a senha quando faço a conexão a primeira vez

Obrigado.

Antonio Carlos

[Italo Giurizzato Junior]

Bom dia Antonio Carlos,

Qual certificado você esta utilizando o A1 ou A3 ?

O meu cliente usa A1, só é informado o numero de série do certificado a senha deixo em branco.

[antonio]

Bom dia Antonio Carlos,

Qual certificado você esta utilizando o A1 ou A3 ?

O meu cliente usa A1, só é informado o numero de série do certificado a senha deixo em branco.

No caso estou utilizando o A3

[Italo Giurizzato Junior]

Antonio Carlos,

No caso do A3 você deve configurar desta forma:

// Configurações -> Certificados

ACBrCTe1.Configuracoes.Certificados.NumeroSerie:=' informar o numero de série ';

ACBrCTe1.Configuracoes.Certificados.Senha:=' informar a senha ';

[antonio]

Antonio Carlos,

No caso do A3 você deve configurar desta forma:

// Configurações -> Certificados

ACBrCTe1.Configuracoes.Certificados.NumeroSerie:=' informar o numero de série ';

ACBrCTe1.Configuracoes.Certificados.Senha:=' informar a senha ';

No caso já estou fazendo isso.

aqui o codigo abaixo:

ACBrCTe1.Configuracoes.WebServices.UF := SUF;

AcbrCte1.Configuracoes.webServices.AmbienteCodigo := StrtoInt(sambiente);

ACBrCTe1.Configuracoes.Certificados.NumeroSerie := sCertificado; // passando o certifcado

ACBrcte1.Configuracoes.Certificados.Senha := trim(edtsenha.text) ; // passando a senha

ACBrCTe1.WebServices.Consulta.Executar ; // aqui mando executar a consulta ao CTE

Na unit ACBrCTeConfiguracoes, acontece o seguinte

FsENHACERT está com a senha que foi passada e entra no codigo abaixo

if (FSenhaCert <> '') and PrivateKey.IsHardwareDevice then

begin

PrivateKey := Cert.PrivateKey;

..

..

// aqui acontecendo o problema que é abre a tela para informar a senha

dsigKey := xmldsig.createKeyFromCSP(PrivateKey.ProviderType, PrivateKey.ProviderName, PrivateKey.ContainerName, 0);

// ..

SigKey := dsigKey as IXMLDSigKeyEx;

SigKey.getCSPHandle( hCryptProvider );

try

CryptSetProvParam( hCryptProvider , PP_SIGNATURE_PIN, LPBYTE(FSenhaCert), 0 );

finally

CryptReleaseContext(hCryptProvider, 0);

end;

Nesse comando aqui ele abre a tela para digitar a senha.

dsigKey := xmldsig.createKeyFromCSP(PrivateKey.ProviderType, PrivateKey.ProviderName, PrivateKey.ContainerName, 0);

tentei comentar a linha de cima para não abrir essa tela e passando esse comando

CryptSetProvParam( hCryptProvider , PP_SIGNATURE_PIN, LPBYTE(FSenhaCert), 0 );

só que não adiantou, em outro lugar que eu ainda nao descobri ele abre de novo a tela para digitar a senha

Antonio Carlos

[Italo Giurizzato Junior]

Boa tarde Antonio Carlos,

Conforme foi postado você passa para o componente o Numero de Série e a Senha do Certificado.

Muito bem ao executar a aplicação a aplicação solicita novamente a senha?

O componente foi colocado em um form ou Data Module que fica sempre criado enquanto a sua aplicação estiver em execução?

Ou foi colocado em um form que é criado dinamicamente (exemplo ao emitir o CT-e) ?

Na minha aplicação coloquei em um Data Module e o deixo criado enquanto ela fica em execução.

[antonio]

Boa tarde Antonio Carlos,

Conforme foi postado você passa para o componente o Numero de Série e a Senha do Certificado.

Muito bem ao executar a aplicação a aplicação solicita novamente a senha?

O componente foi colocado em um form ou Data Module que fica sempre criado enquanto a sua aplicação estiver em execução?

Ou foi colocado em um form que é criado dinamicamente (exemplo ao emitir o CT-e) ?

Na minha aplicação coloquei em um Data Module e o deixo criado enquanto ela fica em execução.

Inseri o componente diretamente no form e uso ele

[antonio]

Boa tarde Antonio Carlos,

Conforme foi postado você passa para o componente o Numero de Série e a Senha do Certificado.

Muito bem ao executar a aplicação a aplicação solicita novamente a senha?

O componente foi colocado em um form ou Data Module que fica sempre criado enquanto a sua aplicação estiver em execução?

Ou foi colocado em um form que é criado dinamicamente (exemplo ao emitir o CT-e) ?

Na minha aplicação coloquei em um Data Module e o deixo criado enquanto ela fica em execução.

Inseri o componente diretamente no form e uso ele

Já utilizei até o data modulo

mas não funciona.

Ele sempre pede a senha na primeira vez. Nas outras vezes se faço a consulta não pede a senha

se estiver conectado O problema é sempre a primeira vez.

Existe alguma maneira na primeira vez ele não pedir a senha ou e impossivel ?

porque a ideia era usar um serviço a ser instalado numa maquina servidora e na maquina local pudesse acessar esse serviço.

Se abrir esse tela de senha, vai ficar travado porque essa tela não vai abrir na maquina local.

Antonio

[LeoSlander]

Sei que já tem um tempo que este post foi aberto mas Antonio vc consegui jogar a senha para o certificado sem a necessidade de ter que digita-lo?

[Doni Delphi]

Boa a noite a todos

Como voceis tem trabalhado com o certificado A3 em relação a senha

é desta maneira

ACBrCTe1.Configuracoes.Certificados.NumeroSerie:=' informar o numero de série ';

ACBrCTe1.Configuracoes.Certificados.Senha:=' informar a senha ';

Obrigado

[Mega Online]

ola pessoal boa noite, sei que o fórum é bem antigo e tem muitos outros com o mesmo assunto e nenhum deixou claro a solução. Afinal como fazer para não pedir a senha do certificado A3 na primeira vez? o sistema está em um computador em que não terá o usuário para digitar esta senha. É na instalação do certificado? configuração do I.E. ou configuração do componente?

utilizo acbrmonitor com capicom.

 

[Mega Online]

Olá pessoal, obrigado segue abaixo o link com a resposta que pode nos ajudar