打印本文 打印本文 关闭窗口 关闭窗口
VB中使用WMI获取系统硬件和软件有关信息
作者:武汉SEO闵涛  文章来源:敏韬网  点击数4186  更新时间:2009/4/23 18:59:16  文章录入:mintao  责任编辑:mintao
ription; uint32 ICMIntent; uint32 ICMMethod; string InfFilename; string InfSection; datetime InstallDate; string InstalledDisplayDrivers; uint32 LastErrorCode; uint32 MaxMemorySupported; uint32 MaxNumberControlled; uint32 MaxRefreshRate; uint32 MinRefreshRate; boolean Monochrome; string Name; uint16 NumberOfColorPlanes; uint32 NumberOfVideoPages; string PNPDeviceID; uint16 PowerManagementCapabilities[]; boolean PowerManagementSupported; uint16 ProtocolSupported; uint32 ReservedSystemPaletteEntries; uint32 SpecificationVersion; string Status; uint16 StatusInfo; string SystemCreationClassName; string SystemName; uint32 SystemPaletteEntries; datetime TimeOfLastReset; uint16 VideoArchitecture; uint16 VideoMemoryType; uint16 VideoMode; string VideoModeDescription; string VideoProcessor; };

声卡等

class Win32_SoundDevice : CIM_LogicalDevice
{
  uint16 Availability;
  string Caption;
  uint32 ConfigManagerErrorCode;
  boolean ConfigManagerUserConfig;
  string CreationClassName;
  string Description;
  string DeviceID;
  uint16 DMABufferSize;
  boolean ErrorCleared;
  string ErrorDescription;
  datetime InstallDate;
  uint32 LastErrorCode;
  string Manufacturer;
  uint32 MPU401Address;
  string Name;
  string PNPDeviceID;
  uint16 PowerManagementCapabilities[];
  boolean PowerManagementSupported;
  string ProductName;
  string Status;
  uint16 StatusInfo;
  string SystemCreationClassName;
  string SystemName;
};

class Win32_PrintJob : CIM_Job
{
  string Caption;
  string DataType;
  string Description;
  string Document;
  string DriverName;
  datetime ElapsedTime;
  string HostPrintQueue;
  datetime InstallDate;
  uint32 JobId;
  string JobStatus;
  string Name;
  string Notify;
  string Owner;
  uint32 PagesPrinted;
  string Parameters;
  string PrintProcessor;
  uint32 Priority;
  uint32 Size;
  datetime StartTime;
  string Status;
  uint32 StatusMask;
  datetime TimeSubmitted;
  uint32 TotalPages;
  datetime UntilTime;
};

   Set wmiObjSet = GetObject("winmgmts:{impersonationLevel=impersonate}"). _
                          InstancesOf("Win32_PrintJob")

可以获得打印任务列表等信息

 

对于VB来讲获得系统硬件和软件信息大都使用API,现在使用WMI可以快速的实现我们的目标.如获取驱动器/显卡/共享信息等等都会变得方便和有效

 

 

 

上一页  [1] [2] [3] 

打印本文 打印本文 关闭窗口 关闭窗口