Select Code to Download

set objWMILocator = CreateObject("WbemScripting.SWbemLocator")
objWMILocator.Security_.AuthenticationLevel = 6

Option Explicit
On Error Resume Next

...
Next      

WScript.Quit(0)

use strict;
...
}     

print "\nfinished\n";