none
Assinatura digital com CAPCOM RRS feed

  • Pergunta

  • 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

    segunda-feira, 21 de julho de 2008 18:12

Todas as Respostas