Ver Mensaje Individual
  #39 (permalink)  
Antiguo 03/12/2009, 15:55
dumysoft
 
Fecha de Ingreso: diciembre-2009
Mensajes: 9
Antigüedad: 15 años
Puntos: 0
Respuesta: Facturacion electronica en México

Gracias por tu respuesta.....

Aun no he podido terminar una prueba
Estoy utilizando este codigo
que estare haciendo mal?

Dim readFile As System.IO.TextReader = New StreamReader("C:\Factura Electronica\FIEL RENOVADA 05-05-2009\ult870701b55_0906050905.key")
Dim Ocert As New PemReader(readFile)
Dim o As AsymmetricCipherKeyPair = TryCast(Ocert.ReadObject(), AsymmetricCipherKeyPair)
Dim sig As ISigner = SignerUtilities.GetSigner("MD5WithRSAEncryption")
sig.Init(True, o.[Private])
Dim signature As Byte() = sig.GenerateSignature()
Dim signatureHeader = Convert.ToBase64String(signature)

readFile.Close()
readFile = Nothing