You are here:
ActiveXperts.com > ActiveXperts Network Monitor > WindowsManagement > WMI > Samples > Operating System
Quicklinks
ActiveXperts Network Monitor is an advanced and easy tool for monitoring LAN and WAN networks, network servers, workstations and TCP/IP devices. It has a large set of built-in checks, and you can add new checks by writing scripts. You can use VBScript (Windows) or RSH (UNIX) for it. VBScript checks can use WMI and ADSI. WMI is an interface to a broad range of properties of a computer/OS/application. With ADSI, you can monitor Directory Services.
Use the samples below to get used to various WMI classes, and use these classes in your own, custom ActiveXperts Network Monitor check. Each sample below can also be copied to a new file and then run from the command prompt (CSCRIPT.EXE <file>.vbs).
Win32_AccountOn Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Account",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Domain: " & objItem.Domain
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SID: " & objItem.SID
Wscript.Echo "SIDType: " & objItem.SIDType
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_AccountSID",,48)
For Each objItem in colItems
Wscript.Echo "Element: " & objItem.Element
Wscript.Echo "Setting: " & objItem.Setting
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ACE",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "AceFlags: " & objItem.AceFlags
Wscript.Echo "AceType: " & objItem.AceType
Wscript.Echo "GuidInheritedObjectType: " & objItem.GuidInheritedObjectType
Wscript.Echo "GuidObjectType: " & objItem.GuidObjectType
Wscript.Echo "Trustee: " & objItem.Trustee
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_BaseService",,48)
For Each objItem in colItems
Wscript.Echo "AcceptPause: " & objItem.AcceptPause
Wscript.Echo "AcceptStop: " & objItem.AcceptStop
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DesktopInteract: " & objItem.DesktopInteract
Wscript.Echo "DisplayName: " & objItem.DisplayName
Wscript.Echo "ErrorControl: " & objItem.ErrorControl
Wscript.Echo "ExitCode: " & objItem.ExitCode
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PathName: " & objItem.PathName
Wscript.Echo "ServiceSpecificExitCode: " & objItem.ServiceSpecificExitCode
Wscript.Echo "ServiceType: " & objItem.ServiceType
Wscript.Echo "Started: " & objItem.Started
Wscript.Echo "StartMode: " & objItem.StartMode
Wscript.Echo "StartName: " & objItem.StartName
Wscript.Echo "State: " & objItem.State
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "TagId: " & objItem.TagId
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_BootConfiguration",,48)
For Each objItem in colItems
Wscript.Echo "BootDirectory: " & objItem.BootDirectory
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ConfigurationPath: " & objItem.ConfigurationPath
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "LastDrive: " & objItem.LastDrive
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "ScratchDirectory: " & objItem.ScratchDirectory
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "TempDirectory: " & objItem.TempDirectory
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ClassicCOMClass",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ComponentId: " & objItem.ComponentId
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ClassicCOMClassSetting",,48)
For Each objItem in colItems
Wscript.Echo "AppID: " & objItem.AppID
Wscript.Echo "AutoConvertToClsid: " & objItem.AutoConvertToClsid
Wscript.Echo "AutoTreatAsClsid: " & objItem.AutoTreatAsClsid
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ComponentId: " & objItem.ComponentId
Wscript.Echo "Control: " & objItem.Control
Wscript.Echo "DefaultIcon: " & objItem.DefaultIcon
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InprocHandler: " & objItem.InprocHandler
Wscript.Echo "InprocHandler32: " & objItem.InprocHandler32
Wscript.Echo "InprocServer: " & objItem.InprocServer
Wscript.Echo "InprocServer32: " & objItem.InprocServer32
Wscript.Echo "Insertable: " & objItem.Insertable
Wscript.Echo "JavaClass: " & objItem.JavaClass
Wscript.Echo "LocalServer: " & objItem.LocalServer
Wscript.Echo "LocalServer32: " & objItem.LocalServer32
Wscript.Echo "LongDisplayName: " & objItem.LongDisplayName
Wscript.Echo "ProgId: " & objItem.ProgId
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "ShortDisplayName: " & objItem.ShortDisplayName
Wscript.Echo "ThreadingModel: " & objItem.ThreadingModel
Wscript.Echo "ToolBoxBitmap32: " & objItem.ToolBoxBitmap32
Wscript.Echo "TreatAsClsid: " & objItem.TreatAsClsid
Wscript.Echo "TypeLibraryId: " & objItem.TypeLibraryId
Wscript.Echo "Version: " & objItem.Version
Wscript.Echo "VersionIndependentProgId: " & objItem.VersionIndependentProgId
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_CodecFile",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "Archive: " & objItem.Archive
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Compressed: " & objItem.Compressed
Wscript.Echo "CompressionMethod: " & objItem.CompressionMethod
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CreationDate: " & objItem.CreationDate
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Drive: " & objItem.Drive
Wscript.Echo "EightDotThreeFileName: " & objItem.EightDotThreeFileName
Wscript.Echo "Encrypted: " & objItem.Encrypted
Wscript.Echo "EncryptionMethod: " & objItem.EncryptionMethod
Wscript.Echo "Extension: " & objItem.Extension
Wscript.Echo "FileName: " & objItem.FileName
Wscript.Echo "FileSize: " & objItem.FileSize
Wscript.Echo "FileType: " & objItem.FileType
Wscript.Echo "FSCreationClassName: " & objItem.FSCreationClassName
Wscript.Echo "FSName: " & objItem.FSName
Wscript.Echo "Group: " & objItem.Group
Wscript.Echo "Hidden: " & objItem.Hidden
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "InUseCount: " & objItem.InUseCount
Wscript.Echo "LastAccessed: " & objItem.LastAccessed
Wscript.Echo "LastModified: " & objItem.LastModified
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "Readable: " & objItem.Readable
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "System: " & objItem.System
Wscript.Echo "Version: " & objItem.Version
Wscript.Echo "Writeable: " & objItem.Writeable
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_COMApplication",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_COMClass",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComponentCategory",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CategoryId: " & objItem.CategoryId
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystem",,48)
For Each objItem in colItems
Wscript.Echo "AdminPasswordStatus: " & objItem.AdminPasswordStatus
Wscript.Echo "AutomaticResetBootOption: " & objItem.AutomaticResetBootOption
Wscript.Echo "AutomaticResetCapability: " & objItem.AutomaticResetCapability
Wscript.Echo "BootOptionOnLimit: " & objItem.BootOptionOnLimit
Wscript.Echo "BootOptionOnWatchDog: " & objItem.BootOptionOnWatchDog
Wscript.Echo "BootROMSupported: " & objItem.BootROMSupported
Wscript.Echo "BootupState: " & objItem.BootupState
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ChassisBootupState: " & objItem.ChassisBootupState
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CurrentTimeZone: " & objItem.CurrentTimeZone
Wscript.Echo "DaylightInEffect: " & objItem.DaylightInEffect
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Domain: " & objItem.Domain
Wscript.Echo "DomainRole: " & objItem.DomainRole
Wscript.Echo "FrontPanelResetStatus: " & objItem.FrontPanelResetStatus
Wscript.Echo "InfraredSupported: " & objItem.InfraredSupported
Wscript.Echo "InitialLoadInfo: " & objItem.InitialLoadInfo
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "KeyboardPasswordStatus: " & objItem.KeyboardPasswordStatus
Wscript.Echo "LastLoadInfo: " & objItem.LastLoadInfo
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "Model: " & objItem.Model
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NameFormat: " & objItem.NameFormat
Wscript.Echo "NetworkServerModeEnabled: " & objItem.NetworkServerModeEnabled
Wscript.Echo "NumberOfProcessors: " & objItem.NumberOfProcessors
Wscript.Echo "OEMLogoBitmap: " & objItem.OEMLogoBitmap
Wscript.Echo "OEMStringArray: " & objItem.OEMStringArray
Wscript.Echo "PauseAfterReset: " & objItem.PauseAfterReset
Wscript.Echo "PowerManagementCapabilities: " & objItem.PowerManagementCapabilities
Wscript.Echo "PowerManagementSupported: " & objItem.PowerManagementSupported
Wscript.Echo "PowerOnPasswordStatus: " & objItem.PowerOnPasswordStatus
Wscript.Echo "PowerState: " & objItem.PowerState
Wscript.Echo "PowerSupplyState: " & objItem.PowerSupplyState
Wscript.Echo "PrimaryOwnerContact: " & objItem.PrimaryOwnerContact
Wscript.Echo "PrimaryOwnerName: " & objItem.PrimaryOwnerName
Wscript.Echo "ResetCapability: " & objItem.ResetCapability
Wscript.Echo "ResetCount: " & objItem.ResetCount
Wscript.Echo "ResetLimit: " & objItem.ResetLimit
Wscript.Echo "Roles: " & objItem.Roles
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SupportContactDescription: " & objItem.SupportContactDescription
Wscript.Echo "SystemStartupDelay: " & objItem.SystemStartupDelay
Wscript.Echo "SystemStartupOptions: " & objItem.SystemStartupOptions
Wscript.Echo "SystemStartupSetting: " & objItem.SystemStartupSetting
Wscript.Echo "SystemType: " & objItem.SystemType
Wscript.Echo "ThermalState: " & objItem.ThermalState
Wscript.Echo "TotalPhysicalMemory: " & objItem.TotalPhysicalMemory
Wscript.Echo "UserName: " & objItem.UserName
Wscript.Echo "WakeUpType: " & objItem.WakeUpType
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystemProduct",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "IdentifyingNumber: " & objItem.IdentifyingNumber
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SKUNumber: " & objItem.SKUNumber
Wscript.Echo "UUID: " & objItem.UUID
Wscript.Echo "Vendor: " & objItem.Vendor
Wscript.Echo "Version: " & objItem.Version
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_COMSetting",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "SettingID: " & objItem.SettingID
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_DCOMApplication",,48)
For Each objItem in colItems
Wscript.Echo "AppID: " & objItem.AppID
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_DCOMApplicationSetting",,48)
For Each objItem in colItems
Wscript.Echo "AppID: " & objItem.AppID
Wscript.Echo "AuthenticationLevel: " & objItem.AuthenticationLevel
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CustomSurrogate: " & objItem.CustomSurrogate
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "EnableAtStorageActivation: " & objItem.EnableAtStorageActivation
Wscript.Echo "LocalService: " & objItem.LocalService
Wscript.Echo "RemoteServerName: " & objItem.RemoteServerName
Wscript.Echo "RunAsUser: " & objItem.RunAsUser
Wscript.Echo "ServiceParameters: " & objItem.ServiceParameters
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UseSurrogate: " & objItem.UseSurrogate
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Desktop",,48)
For Each objItem in colItems
Wscript.Echo "BorderWidth: " & objItem.BorderWidth
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CoolSwitch: " & objItem.CoolSwitch
Wscript.Echo "CursorBlinkRate: " & objItem.CursorBlinkRate
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DragFullWindows: " & objItem.DragFullWindows
Wscript.Echo "GridGranularity: " & objItem.GridGranularity
Wscript.Echo "IconSpacing: " & objItem.IconSpacing
Wscript.Echo "IconTitleFaceName: " & objItem.IconTitleFaceName
Wscript.Echo "IconTitleSize: " & objItem.IconTitleSize
Wscript.Echo "IconTitleWrap: " & objItem.IconTitleWrap
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Pattern: " & objItem.Pattern
Wscript.Echo "ScreenSaverActive: " & objItem.ScreenSaverActive
Wscript.Echo "ScreenSaverExecutable: " & objItem.ScreenSaverExecutable
Wscript.Echo "ScreenSaverSecure: " & objItem.ScreenSaverSecure
Wscript.Echo "ScreenSaverTimeout: " & objItem.ScreenSaverTimeout
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "Wallpaper: " & objItem.Wallpaper
Wscript.Echo "WallpaperStretched: " & objItem.WallpaperStretched
Wscript.Echo "WallpaperTiled: " & objItem.WallpaperTiled
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Directory",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "Archive: " & objItem.Archive
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Compressed: " & objItem.Compressed
Wscript.Echo "CompressionMethod: " & objItem.CompressionMethod
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CreationDate: " & objItem.CreationDate
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Drive: " & objItem.Drive
Wscript.Echo "EightDotThreeFileName: " & objItem.EightDotThreeFileName
Wscript.Echo "Encrypted: " & objItem.Encrypted
Wscript.Echo "EncryptionMethod: " & objItem.EncryptionMethod
Wscript.Echo "Extension: " & objItem.Extension
Wscript.Echo "FileName: " & objItem.FileName
Wscript.Echo "FileSize: " & objItem.FileSize
Wscript.Echo "FileType: " & objItem.FileType
Wscript.Echo "FSCreationClassName: " & objItem.FSCreationClassName
Wscript.Echo "FSName: " & objItem.FSName
Wscript.Echo "Hidden: " & objItem.Hidden
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "InUseCount: " & objItem.InUseCount
Wscript.Echo "LastAccessed: " & objItem.LastAccessed
Wscript.Echo "LastModified: " & objItem.LastModified
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "Readable: " & objItem.Readable
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "System: " & objItem.System
Wscript.Echo "Writeable: " & objItem.Writeable
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_DirectorySpecification",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CheckID: " & objItem.CheckID
Wscript.Echo "CheckMode: " & objItem.CheckMode
Wscript.Echo "DefaultDir: " & objItem.DefaultDir
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Directory: " & objItem.Directory
Wscript.Echo "DirectoryPath: " & objItem.DirectoryPath
Wscript.Echo "DirectoryType: " & objItem.DirectoryType
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SoftwareElementID: " & objItem.SoftwareElementID
Wscript.Echo "SoftwareElementState: " & objItem.SoftwareElementState
Wscript.Echo "TargetOperatingSystem: " & objItem.TargetOperatingSystem
Wscript.Echo "Version: " & objItem.Version
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_DiskPartition",,48)
For Each objItem in colItems
Wscript.Echo "Access: " & objItem.Access
Wscript.Echo "Availability: " & objItem.Availability
Wscript.Echo "BlockSize: " & objItem.BlockSize
Wscript.Echo "Bootable: " & objItem.Bootable
Wscript.Echo "BootPartition: " & objItem.BootPartition
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ConfigManagerErrorCode: " & objItem.ConfigManagerErrorCode
Wscript.Echo "ConfigManagerUserConfig: " & objItem.ConfigManagerUserConfig
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DeviceID: " & objItem.DeviceID
Wscript.Echo "DiskIndex: " & objItem.DiskIndex
Wscript.Echo "ErrorCleared: " & objItem.ErrorCleared
Wscript.Echo "ErrorDescription: " & objItem.ErrorDescription
Wscript.Echo "ErrorMethodology: " & objItem.ErrorMethodology
Wscript.Echo "HiddenSectors: " & objItem.HiddenSectors
Wscript.Echo "Index: " & objItem.Index
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "LastErrorCode: " & objItem.LastErrorCode
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NumberOfBlocks: " & objItem.NumberOfBlocks
Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Wscript.Echo "PowerManagementCapabilities: " & objItem.PowerManagementCapabilities
Wscript.Echo "PowerManagementSupported: " & objItem.PowerManagementSupported
Wscript.Echo "PrimaryPartition: " & objItem.PrimaryPartition
Wscript.Echo "Purpose: " & objItem.Purpose
Wscript.Echo "RewritePartition: " & objItem.RewritePartition
Wscript.Echo "Size: " & objItem.Size
Wscript.Echo "StartingOffset: " & objItem.StartingOffset
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "StatusInfo: " & objItem.StatusInfo
Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "Type: " & objItem.Type
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_DriverVXD",,48)
For Each objItem in colItems
Wscript.Echo "BuildNumber: " & objItem.BuildNumber
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CodeSet: " & objItem.CodeSet
Wscript.Echo "Control: " & objItem.Control
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DeviceDescriptorBlock: " & objItem.DeviceDescriptorBlock
Wscript.Echo "IdentificationCode: " & objItem.IdentificationCode
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "LanguageEdition: " & objItem.LanguageEdition
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "OtherTargetOS: " & objItem.OtherTargetOS
Wscript.Echo "PM_API: " & objItem.PM_API
Wscript.Echo "SerialNumber: " & objItem.SerialNumber
Wscript.Echo "ServiceTableSize: " & objItem.ServiceTableSize
Wscript.Echo "SoftwareElementID: " & objItem.SoftwareElementID
Wscript.Echo "SoftwareElementState: " & objItem.SoftwareElementState
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "TargetOperatingSystem: " & objItem.TargetOperatingSystem
Wscript.Echo "V86_API: " & objItem.V86_API
Wscript.Echo "Version: " & objItem.Version
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Environment",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemVariable: " & objItem.SystemVariable
Wscript.Echo "UserName: " & objItem.UserName
Wscript.Echo "VariableValue: " & objItem.VariableValue
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Group",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Domain: " & objItem.Domain
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SID: " & objItem.SID
Wscript.Echo "SIDType: " & objItem.SIDType
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LoadOrderGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DriverEnabled: " & objItem.DriverEnabled
Wscript.Echo "GroupOrder: " & objItem.GroupOrder
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LogicalDisk",,48)
For Each objItem in colItems
Wscript.Echo "Access: " & objItem.Access
Wscript.Echo "Availability: " & objItem.Availability
Wscript.Echo "BlockSize: " & objItem.BlockSize
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Compressed: " & objItem.Compressed
Wscript.Echo "ConfigManagerErrorCode: " & objItem.ConfigManagerErrorCode
Wscript.Echo "ConfigManagerUserConfig: " & objItem.ConfigManagerUserConfig
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DeviceID: " & objItem.DeviceID
Wscript.Echo "DriveType: " & objItem.DriveType
Wscript.Echo "ErrorCleared: " & objItem.ErrorCleared
Wscript.Echo "ErrorDescription: " & objItem.ErrorDescription
Wscript.Echo "ErrorMethodology: " & objItem.ErrorMethodology
Wscript.Echo "FileSystem: " & objItem.FileSystem
Wscript.Echo "FreeSpace: " & objItem.FreeSpace
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "LastErrorCode: " & objItem.LastErrorCode
Wscript.Echo "MaximumComponentLength: " & objItem.MaximumComponentLength
Wscript.Echo "MediaType: " & objItem.MediaType
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NumberOfBlocks: " & objItem.NumberOfBlocks
Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Wscript.Echo "PowerManagementCapabilities: " & objItem.PowerManagementCapabilities
Wscript.Echo "PowerManagementSupported: " & objItem.PowerManagementSupported
Wscript.Echo "ProviderName: " & objItem.ProviderName
Wscript.Echo "Purpose: " & objItem.Purpose
Wscript.Echo "Size: " & objItem.Size
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "StatusInfo: " & objItem.StatusInfo
Wscript.Echo "SupportsFileBasedCompression: " & objItem.SupportsFileBasedCompression
Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "VolumeName: " & objItem.VolumeName
Wscript.Echo "VolumeSerialNumber: " & objItem.VolumeSerialNumber
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LogicalFileSecuritySetting",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ControlFlags: " & objItem.ControlFlags
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "OwnerPermissions: " & objItem.OwnerPermissions
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "SettingID: " & objItem.SettingID
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LogicalMemoryConfiguration",,48)
For Each objItem in colItems
Wscript.Echo "AvailableVirtualMemory: " & objItem.AvailableVirtualMemory
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "TotalPageFileSpace: " & objItem.TotalPageFileSpace
Wscript.Echo "TotalPhysicalMemory: " & objItem.TotalPhysicalMemory
Wscript.Echo "TotalVirtualMemory: " & objItem.TotalVirtualMemory
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LogicalProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "UserName: " & objItem.UserName
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LogicalProgramGroupItem",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LogicalShareSecuritySetting",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ControlFlags: " & objItem.ControlFlags
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkClient",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkConnection",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Comment: " & objItem.Comment
Wscript.Echo "ConnectionState: " & objItem.ConnectionState
Wscript.Echo "ConnectionType: " & objItem.ConnectionType
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DisplayType: " & objItem.DisplayType
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "LocalName: " & objItem.LocalName
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Persistent: " & objItem.Persistent
Wscript.Echo "ProviderName: " & objItem.ProviderName
Wscript.Echo "RemoteName: " & objItem.RemoteName
Wscript.Echo "RemotePath: " & objItem.RemotePath
Wscript.Echo "ResourceType: " & objItem.ResourceType
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "UserName: " & objItem.UserName
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkLoginProfile",,48)
For Each objItem in colItems
Wscript.Echo "AccountExpires: " & objItem.AccountExpires
Wscript.Echo "AuthorizationFlags: " & objItem.AuthorizationFlags
Wscript.Echo "BadPasswordCount: " & objItem.BadPasswordCount
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CodePage: " & objItem.CodePage
Wscript.Echo "Comment: " & objItem.Comment
Wscript.Echo "CountryCode: " & objItem.CountryCode
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Flags: " & objItem.Flags
Wscript.Echo "FullName: " & objItem.FullName
Wscript.Echo "HomeDirectory: " & objItem.HomeDirectory
Wscript.Echo "HomeDirectoryDrive: " & objItem.HomeDirectoryDrive
Wscript.Echo "LastLogoff: " & objItem.LastLogoff
Wscript.Echo "LastLogon: " & objItem.LastLogon
Wscript.Echo "LogonHours: " & objItem.LogonHours
Wscript.Echo "LogonServer: " & objItem.LogonServer
Wscript.Echo "MaximumStorage: " & objItem.MaximumStorage
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NumberOfLogons: " & objItem.NumberOfLogons
Wscript.Echo "Parameters: " & objItem.Parameters
Wscript.Echo "PasswordAge: " & objItem.PasswordAge
Wscript.Echo "PasswordExpires: " & objItem.PasswordExpires
Wscript.Echo "PrimaryGroupId: " & objItem.PrimaryGroupId
Wscript.Echo "Privileges: " & objItem.Privileges
Wscript.Echo "Profile: " & objItem.Profile
Wscript.Echo "ScriptPath: " & objItem.ScriptPath
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UnitsPerWeek: " & objItem.UnitsPerWeek
Wscript.Echo "UserComment: " & objItem.UserComment
Wscript.Echo "UserId: " & objItem.UserId
Wscript.Echo "UserType: " & objItem.UserType
Wscript.Echo "Workstations: " & objItem.Workstations
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkProtocol",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ConnectionlessService: " & objItem.ConnectionlessService
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GuaranteesDelivery: " & objItem.GuaranteesDelivery
Wscript.Echo "GuaranteesSequencing: " & objItem.GuaranteesSequencing
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "MaximumAddressSize: " & objItem.MaximumAddressSize
Wscript.Echo "MaximumMessageSize: " & objItem.MaximumMessageSize
Wscript.Echo "MessageOriented: " & objItem.MessageOriented
Wscript.Echo "MinimumAddressSize: " & objItem.MinimumAddressSize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PseudoStreamOriented: " & objItem.PseudoStreamOriented
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SupportsBroadcasting: " & objItem.SupportsBroadcasting
Wscript.Echo "SupportsConnectData: " & objItem.SupportsConnectData
Wscript.Echo "SupportsDisconnectData: " & objItem.SupportsDisconnectData
Wscript.Echo "SupportsEncryption: " & objItem.SupportsEncryption
Wscript.Echo "SupportsExpeditedData: " & objItem.SupportsExpeditedData
Wscript.Echo "SupportsFragmentation: " & objItem.SupportsFragmentation
Wscript.Echo "SupportsGracefulClosing: " & objItem.SupportsGracefulClosing
Wscript.Echo "SupportsGuaranteedBandwidth: " & objItem.SupportsGuaranteedBandwidth
Wscript.Echo "SupportsMulticasting: " & objItem.SupportsMulticasting
Wscript.Echo "SupportsQualityofService: " & objItem.SupportsQualityofService
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NTEventlogFile",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "Archive: " & objItem.Archive
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Compressed: " & objItem.Compressed
Wscript.Echo "CompressionMethod: " & objItem.CompressionMethod
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CreationDate: " & objItem.CreationDate
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Drive: " & objItem.Drive
Wscript.Echo "EightDotThreeFileName: " & objItem.EightDotThreeFileName
Wscript.Echo "Encrypted: " & objItem.Encrypted
Wscript.Echo "EncryptionMethod: " & objItem.EncryptionMethod
Wscript.Echo "Extension: " & objItem.Extension
Wscript.Echo "FileName: " & objItem.FileName
Wscript.Echo "FileSize: " & objItem.FileSize
Wscript.Echo "FileType: " & objItem.FileType
Wscript.Echo "FSCreationClassName: " & objItem.FSCreationClassName
Wscript.Echo "FSName: " & objItem.FSName
Wscript.Echo "Hidden: " & objItem.Hidden
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "InUseCount: " & objItem.InUseCount
Wscript.Echo "LastAccessed: " & objItem.LastAccessed
Wscript.Echo "LastModified: " & objItem.LastModified
Wscript.Echo "LogfileName: " & objItem.LogfileName
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "MaxFileSize: " & objItem.MaxFileSize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NumberOfRecords: " & objItem.NumberOfRecords
Wscript.Echo "OverwriteOutDated: " & objItem.OverwriteOutDated
Wscript.Echo "OverWritePolicy: " & objItem.OverWritePolicy
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "Readable: " & objItem.Readable
Wscript.Echo "Sources: " & objItem.Sources
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "System: " & objItem.System
Wscript.Echo "Version: " & objItem.Version
Wscript.Echo "Writeable: " & objItem.Writeable
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NTLogEvent",,48)
For Each objItem in colItems
Wscript.Echo "Category: " & objItem.Category
Wscript.Echo "CategoryString: " & objItem.CategoryString
Wscript.Echo "ComputerName: " & objItem.ComputerName
Wscript.Echo "Data: " & objItem.Data
Wscript.Echo "EventCode: " & objItem.EventCode
Wscript.Echo "EventIdentifier: " & objItem.EventIdentifier
Wscript.Echo "InsertionStrings: " & objItem.InsertionStrings
Wscript.Echo "Logfile: " & objItem.Logfile
Wscript.Echo "Message: " & objItem.Message
Wscript.Echo "RecordNumber: " & objItem.RecordNumber
Wscript.Echo "SourceName: " & objItem.SourceName
Wscript.Echo "TimeGenerated: " & objItem.TimeGenerated
Wscript.Echo "TimeWritten: " & objItem.TimeWritten
Wscript.Echo "Type: " & objItem.Type
Wscript.Echo "User: " & objItem.User
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem",,48)
For Each objItem in colItems
Wscript.Echo "BootDevice: " & objItem.BootDevice
Wscript.Echo "BuildNumber: " & objItem.BuildNumber
Wscript.Echo "BuildType: " & objItem.BuildType
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CodeSet: " & objItem.CodeSet
Wscript.Echo "CountryCode: " & objItem.CountryCode
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSDVersion: " & objItem.CSDVersion
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "CurrentTimeZone: " & objItem.CurrentTimeZone
Wscript.Echo "Debug: " & objItem.Debug
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Distributed: " & objItem.Distributed
Wscript.Echo "ForegroundApplicationBoost: " & objItem.ForegroundApplicationBoost
Wscript.Echo "FreePhysicalMemory: " & objItem.FreePhysicalMemory
Wscript.Echo "FreeSpaceInPagingFiles: " & objItem.FreeSpaceInPagingFiles
Wscript.Echo "FreeVirtualMemory: " & objItem.FreeVirtualMemory
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "LastBootUpTime: " & objItem.LastBootUpTime
Wscript.Echo "LocalDateTime: " & objItem.LocalDateTime
Wscript.Echo "Locale: " & objItem.Locale
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "MaxNumberOfProcesses: " & objItem.MaxNumberOfProcesses
Wscript.Echo "MaxProcessMemorySize: " & objItem.MaxProcessMemorySize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NumberOfLicensedUsers: " & objItem.NumberOfLicensedUsers
Wscript.Echo "NumberOfProcesses: " & objItem.NumberOfProcesses
Wscript.Echo "NumberOfUsers: " & objItem.NumberOfUsers
Wscript.Echo "Organization: " & objItem.Organization
Wscript.Echo "OSLanguage: " & objItem.OSLanguage
Wscript.Echo "OSProductSuite: " & objItem.OSProductSuite
Wscript.Echo "OSType: " & objItem.OSType
Wscript.Echo "OtherTypeDescription: " & objItem.OtherTypeDescription
Wscript.Echo "PlusProductID: " & objItem.PlusProductID
Wscript.Echo "PlusVersionNumber: " & objItem.PlusVersionNumber
Wscript.Echo "Primary: " & objItem.Primary
Wscript.Echo "QuantumLength: " & objItem.QuantumLength
Wscript.Echo "QuantumType: " & objItem.QuantumType
Wscript.Echo "RegisteredUser: " & objItem.RegisteredUser
Wscript.Echo "SerialNumber: " & objItem.SerialNumber
Wscript.Echo "ServicePackMajorVersion: " & objItem.ServicePackMajorVersion
Wscript.Echo "ServicePackMinorVersion: " & objItem.ServicePackMinorVersion
Wscript.Echo "SizeStoredInPagingFiles: " & objItem.SizeStoredInPagingFiles
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemDevice: " & objItem.SystemDevice
Wscript.Echo "SystemDirectory: " & objItem.SystemDirectory
Wscript.Echo "TotalSwapSpaceSize: " & objItem.TotalSwapSpaceSize
Wscript.Echo "TotalVirtualMemorySize: " & objItem.TotalVirtualMemorySize
Wscript.Echo "TotalVisibleMemorySize: " & objItem.TotalVisibleMemorySize
Wscript.Echo "Version: " & objItem.Version
Wscript.Echo "WindowsDirectory: " & objItem.WindowsDirectory
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_OSRecoveryConfiguration",,48)
For Each objItem in colItems
Wscript.Echo "AutoReboot: " & objItem.AutoReboot
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "DebugFilePath: " & objItem.DebugFilePath
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "KernelDumpOnly: " & objItem.KernelDumpOnly
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "OverwriteExistingDebugFile: " & objItem.OverwriteExistingDebugFile
Wscript.Echo "SendAdminAlert: " & objItem.SendAdminAlert
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "WriteDebugInfo: " & objItem.WriteDebugInfo
Wscript.Echo "WriteToSystemLog: " & objItem.WriteToSystemLog
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PageFile",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "Archive: " & objItem.Archive
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Compressed: " & objItem.Compressed
Wscript.Echo "CompressionMethod: " & objItem.CompressionMethod
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CreationDate: " & objItem.CreationDate
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Drive: " & objItem.Drive
Wscript.Echo "EightDotThreeFileName: " & objItem.EightDotThreeFileName
Wscript.Echo "Encrypted: " & objItem.Encrypted
Wscript.Echo "EncryptionMethod: " & objItem.EncryptionMethod
Wscript.Echo "Extension: " & objItem.Extension
Wscript.Echo "FileName: " & objItem.FileName
Wscript.Echo "FileSize: " & objItem.FileSize
Wscript.Echo "FileType: " & objItem.FileType
Wscript.Echo "FreeSpace: " & objItem.FreeSpace
Wscript.Echo "FSCreationClassName: " & objItem.FSCreationClassName
Wscript.Echo "FSName: " & objItem.FSName
Wscript.Echo "Hidden: " & objItem.Hidden
Wscript.Echo "InitialSize: " & objItem.InitialSize
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "InUseCount: " & objItem.InUseCount
Wscript.Echo "LastAccessed: " & objItem.LastAccessed
Wscript.Echo "LastModified: " & objItem.LastModified
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "MaximumSize: " & objItem.MaximumSize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "Readable: " & objItem.Readable
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "System: " & objItem.System
Wscript.Echo "Version: " & objItem.Version
Wscript.Echo "Writeable: " & objItem.Writeable
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PageFileSetting",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InitialSize: " & objItem.InitialSize
Wscript.Echo "MaximumSize: " & objItem.MaximumSize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PageFileUsage",,48)
For Each objItem in colItems
Wscript.Echo "AllocatedBaseSize: " & objItem.AllocatedBaseSize
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CurrentUsage: " & objItem.CurrentUsage
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PeakUsage: " & objItem.PeakUsage
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PrivilegesStatus",,48)
For Each objItem in colItems
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Operation: " & objItem.Operation
Wscript.Echo "ParameterInfo: " & objItem.ParameterInfo
Wscript.Echo "PrivilegesNotHeld: " & objItem.PrivilegesNotHeld
Wscript.Echo "PrivilegesRequired: " & objItem.PrivilegesRequired
Wscript.Echo "ProviderName: " & objItem.ProviderName
Wscript.Echo "StatusCode: " & objItem.StatusCode
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Process",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CreationDate: " & objItem.CreationDate
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "ExecutablePath: " & objItem.ExecutablePath
Wscript.Echo "ExecutionState: " & objItem.ExecutionState
Wscript.Echo "Handle: " & objItem.Handle
Wscript.Echo "HandleCount: " & objItem.HandleCount
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "KernelModeTime: " & objItem.KernelModeTime
Wscript.Echo "MaximumWorkingSetSize: " & objItem.MaximumWorkingSetSize
Wscript.Echo "MinimumWorkingSetSize: " & objItem.MinimumWorkingSetSize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "OSCreationClassName: " & objItem.OSCreationClassName
Wscript.Echo "OSName: " & objItem.OSName
Wscript.Echo "OtherOperationCount: " & objItem.OtherOperationCount
Wscript.Echo "OtherTransferCount: " & objItem.OtherTransferCount
Wscript.Echo "PageFaults: " & objItem.PageFaults
Wscript.Echo "PageFileUsage: " & objItem.PageFileUsage
Wscript.Echo "ParentProcessId: " & objItem.ParentProcessId
Wscript.Echo "PeakPageFileUsage: " & objItem.PeakPageFileUsage
Wscript.Echo "PeakVirtualSize: " & objItem.PeakVirtualSize
Wscript.Echo "PeakWorkingSetSize: " & objItem.PeakWorkingSetSize
Wscript.Echo "Priority: " & objItem.Priority
Wscript.Echo "PrivatePageCount: " & objItem.PrivatePageCount
Wscript.Echo "ProcessId: " & objItem.ProcessId
Wscript.Echo "QuotaNonPagedPoolUsage: " & objItem.QuotaNonPagedPoolUsage
Wscript.Echo "QuotaPagedPoolUsage: " & objItem.QuotaPagedPoolUsage
Wscript.Echo "QuotaPeakNonPagedPoolUsage: " & objItem.QuotaPeakNonPagedPoolUsage
Wscript.Echo "QuotaPeakPagedPoolUsage: " & objItem.QuotaPeakPagedPoolUsage
Wscript.Echo "ReadOperationCount: " & objItem.ReadOperationCount
Wscript.Echo "ReadTransferCount: " & objItem.ReadTransferCount
Wscript.Echo "SessionId: " & objItem.SessionId
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "TerminationDate: " & objItem.TerminationDate
Wscript.Echo "ThreadCount: " & objItem.ThreadCount
Wscript.Echo "UserModeTime: " & objItem.UserModeTime
Wscript.Echo "VirtualSize: " & objItem.VirtualSize
Wscript.Echo "WindowsVersion: " & objItem.WindowsVersion
Wscript.Echo "WorkingSetSize: " & objItem.WorkingSetSize
Wscript.Echo "WriteOperationCount: " & objItem.WriteOperationCount
Wscript.Echo "WriteTransferCount: " & objItem.WriteTransferCount
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ProcessStartup",,48)
For Each objItem in colItems
Wscript.Echo "CreateFlags: " & objItem.CreateFlags
Wscript.Echo "EnvironmentVariables: " & objItem.EnvironmentVariables
Wscript.Echo "ErrorMode: " & objItem.ErrorMode
Wscript.Echo "FillAttribute: " & objItem.FillAttribute
Wscript.Echo "PriorityClass: " & objItem.PriorityClass
Wscript.Echo "ShowWindow: " & objItem.ShowWindow
Wscript.Echo "Title: " & objItem.Title
Wscript.Echo "WinstationDesktop: " & objItem.WinstationDesktop
Wscript.Echo "X: " & objItem.X
Wscript.Echo "XCountChars: " & objItem.XCountChars
Wscript.Echo "XSize: " & objItem.XSize
Wscript.Echo "Y: " & objItem.Y
Wscript.Echo "YCountChars: " & objItem.YCountChars
Wscript.Echo "YSize: " & objItem.YSize
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ProgramGroupOrItem",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_QuickFixEngineering",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "FixComments: " & objItem.FixComments
Wscript.Echo "HotFixID: " & objItem.HotFixID
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "InstalledBy: " & objItem.InstalledBy
Wscript.Echo "InstalledOn: " & objItem.InstalledOn
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "ServicePackInEffect: " & objItem.ServicePackInEffect
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Registry",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CurrentSize: " & objItem.CurrentSize
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "MaximumSize: " & objItem.MaximumSize
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "ProposedSize: " & objItem.ProposedSize
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_RegistryAction",,48)
For Each objItem in colItems
Wscript.Echo "ActionID: " & objItem.ActionID
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Direction: " & objItem.Direction
Wscript.Echo "EntryName: " & objItem.EntryName
Wscript.Echo "EntryValue: " & objItem.EntryValue
Wscript.Echo "key: " & objItem.key
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Registry: " & objItem.Registry
Wscript.Echo "Root: " & objItem.Root
Wscript.Echo "SoftwareElementID: " & objItem.SoftwareElementID
Wscript.Echo "SoftwareElementState: " & objItem.SoftwareElementState
Wscript.Echo "TargetOperatingSystem: " & objItem.TargetOperatingSystem
Wscript.Echo "Version: " & objItem.Version
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Service",,48)
For Each objItem in colItems
Wscript.Echo "AcceptPause: " & objItem.AcceptPause
Wscript.Echo "AcceptStop: " & objItem.AcceptStop
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CheckPoint: " & objItem.CheckPoint
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DesktopInteract: " & objItem.DesktopInteract
Wscript.Echo "DisplayName: " & objItem.DisplayName
Wscript.Echo "ErrorControl: " & objItem.ErrorControl
Wscript.Echo "ExitCode: " & objItem.ExitCode
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PathName: " & objItem.PathName
Wscript.Echo "ProcessId: " & objItem.ProcessId
Wscript.Echo "ServiceSpecificExitCode: " & objItem.ServiceSpecificExitCode
Wscript.Echo "ServiceType: " & objItem.ServiceType
Wscript.Echo "Started: " & objItem.Started
Wscript.Echo "StartMode: " & objItem.StartMode
Wscript.Echo "StartName: " & objItem.StartName
Wscript.Echo "State: " & objItem.State
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "TagId: " & objItem.TagId
Wscript.Echo "WaitHint: " & objItem.WaitHint
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Share",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "AllowMaximum: " & objItem.AllowMaximum
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "MaximumAllowed: " & objItem.MaximumAllowed
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "Type: " & objItem.Type
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ShortcutFile",,48)
For Each objItem in colItems
Wscript.Echo "AccessMask: " & objItem.AccessMask
Wscript.Echo "Archive: " & objItem.Archive
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Compressed: " & objItem.Compressed
Wscript.Echo "CompressionMethod: " & objItem.CompressionMethod
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CreationDate: " & objItem.CreationDate
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Drive: " & objItem.Drive
Wscript.Echo "EightDotThreeFileName: " & objItem.EightDotThreeFileName
Wscript.Echo "Encrypted: " & objItem.Encrypted
Wscript.Echo "EncryptionMethod: " & objItem.EncryptionMethod
Wscript.Echo "Extension: " & objItem.Extension
Wscript.Echo "FileName: " & objItem.FileName
Wscript.Echo "FileSize: " & objItem.FileSize
Wscript.Echo "FileType: " & objItem.FileType
Wscript.Echo "FSCreationClassName: " & objItem.FSCreationClassName
Wscript.Echo "FSName: " & objItem.FSName
Wscript.Echo "Hidden: " & objItem.Hidden
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "InUseCount: " & objItem.InUseCount
Wscript.Echo "LastAccessed: " & objItem.LastAccessed
Wscript.Echo "LastModified: " & objItem.LastModified
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Path: " & objItem.Path
Wscript.Echo "Readable: " & objItem.Readable
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "System: " & objItem.System
Wscript.Echo "Target: " & objItem.Target
Wscript.Echo "Version: " & objItem.Version
Wscript.Echo "Writeable: " & objItem.Writeable
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_SID",,48)
For Each objItem in colItems
Wscript.Echo "AccountName: " & objItem.AccountName
Wscript.Echo "BinaryRepresentation: " & objItem.BinaryRepresentation
Wscript.Echo "ReferencedDomainName: " & objItem.ReferencedDomainName
Wscript.Echo "SID: " & objItem.SID
Wscript.Echo "SidLength: " & objItem.SidLength
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_StartupCommand",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Command: " & objItem.Command
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Location: " & objItem.Location
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "User: " & objItem.User
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_SystemAccount",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Domain: " & objItem.Domain
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SID: " & objItem.SID
Wscript.Echo "SIDType: " & objItem.SIDType
Wscript.Echo "Status: " & objItem.Status
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_SystemDriver",,48)
For Each objItem in colItems
Wscript.Echo "AcceptPause: " & objItem.AcceptPause
Wscript.Echo "AcceptStop: " & objItem.AcceptStop
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DesktopInteract: " & objItem.DesktopInteract
Wscript.Echo "DisplayName: " & objItem.DisplayName
Wscript.Echo "ErrorControl: " & objItem.ErrorControl
Wscript.Echo "ExitCode: " & objItem.ExitCode
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PathName: " & objItem.PathName
Wscript.Echo "ServiceSpecificExitCode: " & objItem.ServiceSpecificExitCode
Wscript.Echo "ServiceType: " & objItem.ServiceType
Wscript.Echo "Started: " & objItem.Started
Wscript.Echo "StartMode: " & objItem.StartMode
Wscript.Echo "StartName: " & objItem.StartName
Wscript.Echo "State: " & objItem.State
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "TagId: " & objItem.TagId
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Thread",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "CSCreationClassName: " & objItem.CSCreationClassName
Wscript.Echo "CSName: " & objItem.CSName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "ElapsedTime: " & objItem.ElapsedTime
Wscript.Echo "ExecutionState: " & objItem.ExecutionState
Wscript.Echo "Handle: " & objItem.Handle
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "KernelModeTime: " & objItem.KernelModeTime
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "OSCreationClassName: " & objItem.OSCreationClassName
Wscript.Echo "OSName: " & objItem.OSName
Wscript.Echo "Priority: " & objItem.Priority
Wscript.Echo "PriorityBase: " & objItem.PriorityBase
Wscript.Echo "ProcessCreationClassName: " & objItem.ProcessCreationClassName
Wscript.Echo "ProcessHandle: " & objItem.ProcessHandle
Wscript.Echo "StartAddress: " & objItem.StartAddress
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "ThreadState: " & objItem.ThreadState
Wscript.Echo "ThreadWaitReason: " & objItem.ThreadWaitReason
Wscript.Echo "UserModeTime: " & objItem.UserModeTime
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_TimeZone",,48)
For Each objItem in colItems
Wscript.Echo "Bias: " & objItem.Bias
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "DaylightBias: " & objItem.DaylightBias
Wscript.Echo "DaylightDay: " & objItem.DaylightDay
Wscript.Echo "DaylightDayOfWeek: " & objItem.DaylightDayOfWeek
Wscript.Echo "DaylightHour: " & objItem.DaylightHour
Wscript.Echo "DaylightMillisecond: " & objItem.DaylightMillisecond
Wscript.Echo "DaylightMinute: " & objItem.DaylightMinute
Wscript.Echo "DaylightMonth: " & objItem.DaylightMonth
Wscript.Echo "DaylightName: " & objItem.DaylightName
Wscript.Echo "DaylightSecond: " & objItem.DaylightSecond
Wscript.Echo "DaylightYear: " & objItem.DaylightYear
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "StandardBias: " & objItem.StandardBias
Wscript.Echo "StandardDay: " & objItem.StandardDay
Wscript.Echo "StandardDayOfWeek: " & objItem.StandardDayOfWeek
Wscript.Echo "StandardHour: " & objItem.StandardHour
Wscript.Echo "StandardMillisecond: " & objItem.StandardMillisecond
Wscript.Echo "StandardMinute: " & objItem.StandardMinute
Wscript.Echo "StandardMonth: " & objItem.StandardMonth
Wscript.Echo "StandardName: " & objItem.StandardName
Wscript.Echo "StandardSecond: " & objItem.StandardSecond
Wscript.Echo "StandardYear: " & objItem.StandardYear
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Trustee",,48)
For Each objItem in colItems
Wscript.Echo "Domain: " & objItem.Domain
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SID: " & objItem.SID
Wscript.Echo "SidLength: " & objItem.SidLength
Wscript.Echo "SIDString: " & objItem.SIDString
Next
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_UserAccount",,48)
For Each objItem in colItems
Wscript.Echo "AccountType: " & objItem.AccountType
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Disabled: " & objItem.Disabled
Wscript.Echo "Domain: " & objItem.Domain
Wscript.Echo "FullName: " & objItem.FullName
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Lockout: " & objItem.Lockout
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PasswordChangeable: " & objItem.PasswordChangeable
Wscript.Echo "PasswordExpires: " & objItem.PasswordExpires
Wscript.Echo "PasswordRequired: " & objItem.PasswordRequired
Wscript.Echo "SID: " & objItem.SID
Wscript.Echo "SIDType: " & objItem.SIDType
Wscript.Echo "Status: " & objItem.Status
Next