You are here:
ActiveXperts.com > ActiveXperts Network Monitor > WindowsManagement > Scripts > Security > Script Signing
Quicklinks
Set objSigner = WScript.CreateObject("Scripting.Signer")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("c:\scripts")
Set colListOfFiles = objFolder.Files
For Each objFile in colListOfFiles
objSigner.SignFile objFile.Path, "IT Department"
Next
Uses the Scripting Runtime Signer object to digitally sign a script. Requires a valid digital certificate.
blnShowGUI = False
set objSigner = WScript.CreateObject("Scripting.Signer")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("C:\Scripts\")
Set colListOfFiles = objFolder.Files
For Each objFile in colListOfFiles
If Right(objFile.Name, 3) = "vbs" Then
blnIsSigned = objSigner.VerifyFile(objFile.Path, blnShowGUI)
If blnIsSigned then
WScript.Echo objFile.Name & " has been signed."
Else
WScript.Echo objFile.Name & " has not been signed."
End If
End If
Next
blnShowGUI = False
Set objSigner = WScript.CreateObject("Scripting.Signer")
blnIsSigned = objSigner.VerifyFile("C:\Scripts\CreateUser.vbs", blnShowGUI)
If blnIsSigned Then
WScript.Echo "Script has been signed."
Else
WScript.Echo " Script has not been signed."
End If