[Mike909]

Добавил получение PrivateKey:

Код:

....
Global $oCertStore = ObjCreate('CAPICOM.Store')
;1 - CAPICOM_LOCAL_MACHINE_STORE
;2 - CAPICOM_CURRENT_USER_STORE
$oCertStore.Open(1, 'My' , 0) ; Change 'Root' to 'my' for user's local machine store     ; First param: 1-  Local Machine ; 2 - Current User
Local $oCerts = $oCertStore.Certificates
Local $aCerts[$oCerts.Count + 1][8] = [[$oCerts.Count, 'IssuerName', 'SerialNumber', 'SubjectName', 'Version', 'ValidFromDate', 'ValidToDate', 'PrivateKey UniqueContainerName']]
Local $iC = 1
;Local $oPriv = $oCertStore.PrivateKey.UniqueContainerName
For $oCert In $oCerts
    $aCerts[$iC][1] = $oCert.IssuerName
    $aCerts[$iC][2] = $oCert.SerialNumber
    $aCerts[$iC][3] = $oCert.SubjectName
    $aCerts[$iC][4] = $oCert.Version
    $aCerts[$iC][5] = _DateFormat($oCert.ValidFromDate)
    $aCerts[$iC][6] = _DateFormat($oCert.ValidToDate)
    If $oCert.HasPrivateKey() Then
        $aCerts[$iC][7] = $oCert.PrivateKey.UniqueContainerName
    EndIf
    $iC += 1
Next

....

https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx