Extraer Certificados digitales

Windows 10 vs Access_2010

Buenos dias al grupo

Alguno puede colaborar para extraer en un cuadro de lista los certificados digitales y sus caracteristicas de los ubicados en el almacen personal del navegador predeteminado.

O si bien se puede expecificar de que navegador se desean extraer y presentarlos en ese cuadro de lista.

Saludos

Hola javier

Lo mire un poco por alto y extraje algún procedimiento:

ejemplos:

Sub GetCertDetails()
'En el ejemplo siguiente se usa el método GetCertificateDetail del objeto SignatureInfo para obtener la fecha de expiración del certificado digital.
Dim objSignatureInfo As SignatureInfo
Dim varDetail As Variant
strDetail = objSignatureInfo.GetCertificateDetail(certdetExpirationDate)
End Sub

Sub SelectDigCertificate(ByVal intHwnd As Long)
'En el ejemplo siguiente se muestra un cuadro de diálogo que permite al usuario seleccionar un certificado digital.
Dim objSignatureInfo As SignatureInfo
Dim objDialog As Object
objDialog = objSignatureInfo.SelectSignatureCertificate(intHwnd)
End Sub

Sub DisplayCertificate(ByVal intHwnd As Long)
'El siguiente ejemplo muestra un certificado digital en la ventana especificada por el argumento Hwnd
Dim objSignatureInfo As SignatureInfo
Dim objDialog As Object
objDialog = objSignatureInfo.ShowSignatureCertificate(intHwnd)
End Sub

Sub SelectDigCertificate(ByVal strVerificationDetail As String)
'El siguiente ejemplo muestra un cuadro de diálogo con detalles sobre el certificado digital del usuario identificado a partir de una huella digital.
Dim objSignatureInfo As SignatureInfo
Dim objDialog As Object
objDialog = objSignatureInfo.SelectCertificateDetailByThumbprint(strVerificationDetail)
End Sub

Ahora hay que saber como implementarlos y avanzar

Gracias por tu respuesta

Saludos