Help for this page

Select Code to Download

Select or download this

@host = ($server,"root/default",$user,$password);
$localWMI = Win32::OLE->new('WbemScripting.SWbemLocator') or die "Cann
+ot access WMI on local machine: ", Win32::OLE->LastError; 
...
if ($err == 0) {print "Successful!\n";}
else {print $err;}

Select or download this
```
Const HKEY_LOCAL_MACHINE = &H80000002
```