Woops. Not enough error checking and I think I'm responsible for this breakage. Anyway quick fix to try.
In audit_windows.vbs find the decodeKey function declaration:
Code:
Function decodeKey(iValues)
Dim arrDPID, foundKeys
arrDPID = Array()
foundKeys = Array()
Select Case (UBound(iValues))
And change the above section of it to this:
Code:
Function decodeKey(iValues)
Dim arrDPID, foundKeys
arrDPID = Array()
foundKeys = Array()
decodeKey = ""
if not isarray(iValues) then
exit function
end if
Select Case (UBound(iValues))
This is the quickest fix (hopefully) but Mark should probably go through and make sure all calls to decodeKey aren't passing a null. Some check and some don't.