Assinatura digital com CAPCOM

Question

Boa tarde a todos.

Estou trabalhando com o CAPCOM 1.0.

Preciso ajustar um pequeno detalhe que estou apanhando.

 

Cenário:

 

Quando o usuário vai assinar um documento e o mesmo tem vários certificados instalados na maquina, abre automanticamente uma caixa do windows para que seja selecione o certificado desejado.

Porem eu gostaria de passar esse certificado como parametro e nao deixar o windows ficar me mostrando essa lista para que o usuario selecione.

 

Exemplo:

 

datatosign = texttosign.value

Set Store = CreateObject("CAPICOM.Store")

Store.Open 2, "MY" ,CAPICOM_STORE_OPEN_READ_ONLY

Set Signer = CreateObject("CAPICOM.Signer")

Signer.Certificate = Store.Certificates.item(1) - > meu problema é aqui, eu passo como parametro, mas a caixa do windows continua abrindo.

Signer.Options = 0

Set Certificates = Nothing

Set Store = Nothing

Set SignedData = CreateObject("CAPICOM.SignedData")

SignedData.Content = datatosign

 

 

Alguem tem alguma sugestão ou solucao ao problema.

Lembrando que é o CAPCON 1.0.

 

Obrigado

Marcondes

Answer 1

 

Achei o item que eu tava procurando para poder desabilitar a caixa do window.

 

 Set Configuracao = CreateObject("CAPICOM.Settings")

Configuracao.EnablePromptForCertificateUI = false.

 

Porem agora ela gera o seguinte erro.

 

 

The UI has been disabled but the component is not able to proceed without futher information from user - 80880901

 

Se alguem tiver alguma sugestao!

 

Marcondes

Answer 2

Marco,

 

 Dá uma olhada nestes métodos :

 

 http://msdn.microsoft.com/en-us/library/aa375673(VS.85).aspx

 

 

 

Espero ter ajudado