13、基于Visual Basic的证书管理实用程序开发

基于Visual Basic的证书管理实用程序开发

1. 证书操作基础函数

1.1 删除证书

CertDeleteCertificateFromStore 函数用于从证书存储中删除证书并释放证书上下文。其语法如下：

Public Declare Function CertDeleteCertificateFromStore _
Lib “Crypt32.dll” (ByVal pCertContext As Long) As Long

该函数的唯一参数 pCertContext 是指向证书上下文的指针。若存在重复的证书上下文，需全部释放以释放上下文占用的资源。

1.2 释放证书上下文

使用完特定的证书上下文后，需调用 CertFreeCertificateContext 函数释放其占用的资源，语法如下：

Public Declare Function CertFreeCertificateContext _
Lib “Crypt32.dll” (ByVal pCertContext As Long) As Long

参数 pCertContext 同样是指向证书上下文的指针。需注意，某些函数会自动删除传入的上下文，即使函数调用失败，因此仅在上下文仍有效时使用此函数。

2. 从证书获取信息 </