VBScript:对文件夹中的文件进行数字签名引发错误“;找不到用于解密的证书和私钥“;

VBScript:对文件夹中的文件进行数字签名引发错误“;找不到用于解密的证书和私钥“;,vbscript,certificate,sign,digital-certificate,mmc,Vbscript,Certificate,Sign,Digital Certificate,Mmc,我已经为“执行此功能”创建了Signer.vbs文件,下面是对特定文件夹的所有文件进行数字签名的VBScript代码。此文件夹包含脚本文件 Dim sCertificate Dim sFolder Dim sStore Dim objSigner Dim objFSO Dim objFolder Dim colListOfFiles Dim objFile sCertificate = "MyCert" sFolder = "D:\App\Project\VALab\SC\VBSigningP

我已经为“执行此功能”创建了Signer.vbs文件,下面是对特定文件夹的所有文件进行数字签名的VBScript代码。此文件夹包含脚本文件

Dim sCertificate
Dim sFolder
Dim sStore
Dim objSigner
Dim objFSO
Dim objFolder
Dim colListOfFiles
Dim objFile

sCertificate = "MyCert"
sFolder = "D:\App\Project\VALab\SC\VBSigningProcess\FilesToSign"
sStore = "my"

Set objSigner = WScript.CreateObject("Scripting.Signer")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(sFolder)
Set colListOfFiles = objFolder.Files

For Each objFile in colListOfFiles
    WScript.Echo "File Name : " & objFile.Path & vbnewline & "Certificate : " & sCertificate & vbnewline & "Store : " & sStore
    objSigner.SignFile objFile.Path, sCertificate
Next
上面的代码在下面的行“找不到用于解密的证书和私钥,错误代码:8009200C”上抛出错误

objSigner.SignFile objFile.Path,证书

位于MMC内部的“MyCert”证书。请查看下面的图片