Absolutely no problem to volunteer with improving a already great product. I'm already happy that there is such a great project.
Your fix has helped...at least a bit.
Now I'm getting this error:
[code]
C:\audit_windows_2000.vbs(3002, 2) SWbemLocator: Der Parameter ist ungültig.
[/code]
with this code:
line 3002 is the part in the else branch
[code]
if strUser <> "" then
' Username & Password provided - assume not a domain local PC.
Set objServices = objLocator.ConnectServer(strComputer, "root\default", strUser, strPass, "", "", wbemConnectFlagUseMaxWait, objCtx)
else
Set objServices = objLocator.ConnectServer(strComputer, "root\default", "", "", "", "", wbemConnectFlagUseMaxWait, objCtx)
end if
[/code]
After commenting this region out the script runs to the end. So perhaps here might me some errorhandling necessary. Even though I am a software developer I'm not a script developer and a fix would be better written by someone other
ADDED:
Ok just did a quick overview of the auditing results.
Is there a known bug which prevents the system from reading the Windows 2000 Keys?
If not... it doesn't work
if it's a known problem or even impossible... Is there a workaround.
Perhaps auditing from a different machine. (the VM is not part of a domain)