Win32-PrinterDriver - WMI VBScript sample
The foundations for Manageability in Windows 2019/2016/2012/2008 and Windows 10/7/XP are Windows Management Instrumentation (WMI; formerly WBEM) and WMI extensions for Windows Driver Model (WDM).
ActiveXperts Network Monitor provides the ability to build monitor check routines based on WMI. ActiveXperts has collected more than a hundred WMI samples. You can use these samples as a base for new check routines you can write yourself.
On this site, you can find many WMI samples.
The Win32_PrinterDriver WMI class can be used in ActiveXperts Network Monitor to monitor your servers.
Win32-PrinterDriver
Example(s)
On Error Resume Next Const wbemFlagReturnImmediately = &h10 Const wbemFlagForwardOnly = &h20 arrComputers = Array("\localhost") For Each strComputer In arrComputers WScript.Echo WScript.Echo "==========================================" WScript.Echo "Computer: " & strComputer WScript.Echo "==========================================" Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_PrinterDriver", "WQL", _ wbemFlagReturnImmediately + wbemFlagForwardOnly) For Each objItem In colItems WScript.Echo "Caption: " & objItem.Caption WScript.Echo "ConfigFile: " & objItem.ConfigFile WScript.Echo "CreationClassName: " & objItem.CreationClassName WScript.Echo "DataFile: " & objItem.DataFile WScript.Echo "DefaultDataType: " & objItem.DefaultDataType strDependentFiles = Join(objItem.DependentFiles, ",") WScript.Echo "DependentFiles: " & strDependentFiles WScript.Echo "Description: " & objItem.Description WScript.Echo "DriverPath: " & objItem.DriverPath WScript.Echo "FilePath: " & objItem.FilePath WScript.Echo "HelpFile: " & objItem.HelpFile WScript.Echo "InfName: " & objItem.InfName WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate) WScript.Echo "MonitorName: " & objItem.MonitorName WScript.Echo "Name: " & objItem.Name WScript.Echo "OEMUrl: " & objItem.OEMUrl WScript.Echo "Started: " & objItem.Started WScript.Echo "StartMode: " & objItem.StartMode WScript.Echo "Status: " & objItem.Status WScript.Echo "SupportedPlatform: " & objItem.SupportedPlatform WScript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName WScript.Echo "SystemName: " & objItem.SystemName WScript.Echo "Version: " & objItem.Version WScript.Echo Next Next Function WMIDateStringToDate(dtmDate) WScript.Echo dtm: WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _ Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _ & " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" & Mid(dtmDate,13, 2)) End Function