Set oShell = WScript.CreateObject("WScript.Shell") 
oShell.Run "cmd /C certutil -SCInfo > " & Chr(34) & "4. VerifySmartCardForLogon.log" & Chr(34), 0, True 
Wscript.Quit 0