14、证书管理与吊销列表应用指南

证书管理与吊销列表应用指南

1. 证书列表展示

要列出证书及其属性，可调用加密类的 ListCerts 函数，将用户从组合框中选择的证书存储区名称作为参数传入，然后把返回的字符串传递到文本框中供用户查看。以下是在 cmdList 命令按钮的 Click 事件中实现此功能的代码：

Private Sub cmdList_Click()
    Dim csCrypt As New clsCrypto
    '--- Retrieve and display the list of certificates
    txtCerts = csCrypt.ListCerts(cboStore)
End Sub

完成上述操作后，就能在系统上运行此应用程序，查看计算机上存储的证书。

2. 证书吊销列表相关知识

当收到证书或从目录中检索到证书时，可使用证书颁发机构（CA）的证书验证其签名，并验证证书是否过期，但如何验证证书是否已被吊销呢？唯一的办法是到 CA 处，对照其吊销证书列表进行检查。有两种方式可以完成这项任务：
- 使用适用于运行 Microsoft 证书服务器的 CA 的 COM 对象，检查单个证书的有效性。
- 从 CA 下载证书吊销列表（CRL），将其存储在证书存储区中，然后对照 CRL 验证证书。

3. 验证证书前的准备知识

在进行证书验证前，需要掌握以下知识：
- 非对称加密和数字证书。