在vbscript中枚举已安装的证书

Question

如何枚举已安装的证书（运行certmgr.msc会看到的所有证书）并检查vb脚本中的序列号？我的目标是删除除具有特定序列号的证书之外的所有证书。

Answer 1

如果您对其他解决方案持开放态度，PowerShell可以提供更简单的处理：

$serial = '...'

Get-ChildItem cert: -Recurse | ? {
  $_.GetType().Name -eq 'X509Certificate2' -and $_.SerialNumber -ne $serial
} | Remove-Item

Answer 2

您可以使用CAPICOM库，特别是Capicom.Store对象执行此操作。 Rob van der Woude有一个很好的例子：

List all certificates