certificado digital -archivo .crt

[Jorge]

hola :

Hola, tengo un certificado .crt y quisiera saber como puedo obtener la fecha de vencimiento ( la fecha hasta que se observa cuando uno ejecuta el archivo clickeandolo )  utilizando visual fox . gracias 

[HERNAN D. A.]

Si se refiere a certificados .crt de AFIP Argentina para facturación Electrónica Instalar el certificado en windows, Panel de Control / Opciones de internet / Contenido / Certificados ahí podes ver todos  los datos lo podes exportar, si hace tiempo que no se renovaban seguramente caducó el 21/02/2017 y si es desde noviembre a esta parte ya duran 24 meses. Sino instalar igual y en detalle se ven los datos. Saludos

[Jorge]

Gracias Hernan por la respuesta :

Si , me referia a dichos certificados. yo lo que queria saber es si hay alguna manera desde visual fox pro  de acceder a este archivo .crt y extraer datos ( en este caso la fecha de vencimiento del certificado ) , o saber como podria exportar el .crt para obtener lo que necesito. gracias 

[Esteban H.]

Acá tenes como podes hacerlo, desconozco si es free esta utilidad, dado q algunas lo son.

 

https://www.example-code.com/foxpro/csr_load_certificate_signing_request.asp

 

Saludos

Esteban.

[Fidel Charny]

Los certificados de factura electrónica duran 24 meses desde la fecha en que se otorgó. Por lo que no hace falta tanto para determinar el vencimiento.

lcCert = "c:\Wsaa_cert\fe_empresa_6892d54538a92ccf.crt"
loFso = NEWOBJECT("Scripting.FileSystemObject")
loFile = loFso.GetFile(m.lccert)
ldMod = loFile.DateLastModified

ldVence = GOMONTH(DATE(YEAR(ldMod),MONTH(ldMod),DAY(ldMod)),24)
MESSAGEBOX(ldVence)

loFile = null
loFso = null

[mapner]

El vencimiento de ayer 21/02 en Argentina se dió por cambio de tecnología de cifrado, ahora se usa SHA 256