Indicates if a certificate exists in a specified certificate store.
Syntax:
Parameters:
- sName – Subject name of the certificate to check.
- sCertStoreLocation – Location of certificate store where certificate is expected.
- sCertSystemStoreName – Certificate store where certificate is expected.
Example:
Dim oEdiDoc As Fredi.ediDocument
Dim oSecurities As Fredi.ediSecurities
Dim sCertName As String
Dim sCertLocation As String
Dim sCertStore As String
' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument
' Get securities object.
Set oSecurities = oEdiDoc.GetSecurities
sCertName = "Edidev Test Certificate"
sCertLocation = "CurrentUser"
sCertStore = "My"
If oSecurities.IsCertificateExistsInLocation(sCertName, sCertLocation, sCertStore) Then
MsgBox "Certificate '" & sCertName & "' found."Else
MsgBox "Certificate '" & sCertName & "' not found."End If
Sample