admin

[系统应用] 读取USB设备特征码,读取其他硬件信息

unit Unit1;


interface


uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ExtCtrls,ActiveX, ComObj, StdCtrls;


type

  TForm1 = class(TForm)

    Button2: TButton;

    Memo1: TMemo;

    procedure Button2Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;


var

  Form1: TForm1;


implementation


{$R *.dfm}


procedure TForm1.Button2Click(Sender: TObject);

var

Locator: OleVariant;

WMI: OleVariant;

RET: OleVariant;

Enum: IEnumVariant;

Tmp: OleVariant;

Value: Cardinal;

begin

Locator := CreateOleObject('WbemScripting.SWbemLocator');

WMI := Locator.ConnectServer('.', '', '', '');

Ret := WMI.ExecQuery('SELECT * FROM Win32_USBHub');//这里Win32_USBHub为检测项,详见下表

Enum:= IUnknown(RET._NewEnum) as IEnumVariant;

while (Enum.Next(1, Tmp, Value) = S_OK) do

begin

  //if Tmp.Name='USB Mass Storage Device' then

  memo1.lines.add('这个u盘的硬件特征码是'+Tmp.PNPDeviceID);//Tmp为检测到返回的数据集合,其中PNPDeviceID为集合中的对象,包含了PID和VID码


end;

end; 


end.







#1楼
发帖时间:5月前   |   查看数:0   |   回复数:1
admin
在很多情况下,你可能都需要得到微机的硬件信息。比如:你想给你的软件加锁,不让别人随便访问。
首先,你必须知道这个应用程序的功能是使用System.Management这个类得到的。因此,你需要加上下面的这句话:
using System.Management;

为了获取硬件信息,你还需要创建一个ManagementObjectSearcher 对象:

ManagementObjectSearcher searcher = new ManagementObjectSearcher("SE    LECT * from " + Key);


// 硬件

Win32_Processor, // CPU 处理器

Win32_PhysicalMemory, // 物理内存条

Win32_Keyboard, // 键盘

Win32_PointingDevice, // 点输入设备,包括鼠标。

Win32_FloppyDrive, // 软盘驱动器

Win32_DiskDrive, // 硬盘驱动器

Win32_CDROMDrive, // 光盘驱动器

Win32_BaseBoard, // 主板

Win32_BIOS, // BIOS 芯片

Win32_ParallelPort, // 并口

Win32_SerialPort, // 串口

Win32_SerialPortConfiguration, // 串口配置

Win32_SoundDevice, // 多媒体设置,一般指声卡。

Win32_SystemSlot, // 主板插槽 (ISA & PCI & AGP)

Win32_USBController, // USB 控制器

Win32_NetworkAdapter, // 网络适配器

Win32_NetworkAdapterConfiguration, // 网络适配器设置

Win32_Printer, // 打印机

Win32_PrinterConfiguration, // 打印机设置

Win32_PrintJob, // 打印机任务

Win32_TCPIPPrinterPort, // 打印机端口

Win32_POTSModem, // MODEM

Win32_POTSModemToSerialPort, // MODEM 端口

Win32_DesktopMonitor, // 显示器

Win32_DisplayConfiguration, // 显卡

Win32_DisplayControllerConfiguration, // 显卡设置

Win32_VideoController, // 显卡细节。

Win32_VideoSettings, // 显卡支持的显示模式。



// 操作系统

Win32_TimeZone, // 时区

Win32_SystemDriver, // 驱动程序

Win32_DiskPartition, // 磁盘分区

Win32_LogicalDisk, // 逻辑磁盘

Win32_LogicalDiskToPartition, // 逻辑磁盘所在分区及始末位置。

Win32_LogicalMemoryConfiguration, // 逻辑内存配置

Win32_PageFile, // 系统页文件信息

Win32_PageFileSetting, // 页文件设置

Win32_BootConfiguration, // 系统启动配置

Win32_ComputerSystem, // 计算机信息简要

Win32_OperatingSystem, // 操作系统信息

Win32_StartupCommand, // 系统自动启动程序

Win32_Service, // 系统安装的服务

Win32_Group, // 系统管理组

Win32_GroupUser, // 系统组帐号

Win32_UserAccount, // 用户帐号

Win32_Process, // 系统进程

Win32_Thread, // 系统线程

Win32_Share, // 共享

Win32_NetworkClient, // 已安装的网络客户端

Win32_NetworkProtocol, // 已安装的网络协议



上面代码的Key是一个将被对应正确的数据填入的值。例如,获取CPU的信息,就需要把Key值设成Win32_Processor.





首先,调用ManagementObjectSearcher实例(在本文中的例子里为searcher )中的Get()方法,该方法将会把返回信息填在这个实例中。然后,你所要做的就是处理这个实例searcher中的数据。




foreach (ManagementObject share in searcher.Get()){// Some Codes ...}


每个ManagementObject的对象中都有一些,我们所需要的数据,当然我们可以接着这么处理这些数据:

foreach (PropertyData PC in share.Properties){//some codes ...}


代码示例:
///
       /// 获得CPU编号
       ///
       ///
       public string GetCPUID()
       {
           string cpuid = "";
           ManagementClass mc = new ManagementClass("Win32_Processor");
           ManagementObjectCollection moc = mc.GetInstances();
           foreach (ManagementObject mo in moc)
           {
               cpuid = mo.Properties["ProcessorId"].Value.ToString();
           }
           return cpuid;
       }
       ///
       /// 获取硬盘序列号
       ///
       ///
       public string GetDiskSerialNumber()
       {
           //这种模式在插入一个U盘后可能会有不同的结果,如插入我的手机时
           String HDid = "";
           ManagementClass mc = new ManagementClass("Win32_DiskDrive");
           ManagementObjectCollection moc = mc.GetInstances();
           foreach (ManagementObject mo in moc)
           {
               HDid = (string)mo.Properties["SerialNumber"].Value;//SerialNumber在Win7以上系统有效
               break;//这名话解决有多个物理盘时产生的问题,只取第一个物理硬盘,也可查wmi_HD["MediaType"].ToString() == "Fixed hard disk media")//固定硬盘,在Win7以上系统上,XP上"Fixed hard disk ”
           }
           return HDid;

           
       }
       ///
       /// 获取网卡硬件地址
       ///
       ///
       public string GetMacAddress()
       {
           string mac = "";
           ManagementClass mc = new ManagementClass("Win32_NetworkAdapterConfiguration");
           ManagementObjectCollection moc = mc.GetInstances();
           foreach (ManagementObject mo in moc)
           {
               if ((bool)mo["IPEnabled"] == true)
               {
                   mac = mo["MacAddress"].ToString();
                   break;
               }
           }
           return mac;
       }
       ///
       /// 获取IP地址
       ///
       ///
       public string GetIPAddress()
       {
           string st = "";
           ManagementClass mc = new ManagementClass("Win32_NetworkAdapterConfiguration");
           ManagementObjectCollection moc = mc.GetInstances();
           foreach (ManagementObject mo in moc)
           {
               if ((bool)mo["IPEnabled"] == true)
               {
                   //st=mo["IpAddress"].ToString();
                   System.Array ar;
                   ar = (System.Array)(mo.Properties["IpAddress"].Value);
                   st = ar.GetValue(0).ToString();
                   break;
               }
           }
           return st;
       }
       ///
       /// 操作系统的登录用户名
       ///
       ///
       public string GetUserName()
       {
           return Environment.UserName;
       }

       ///
       /// 获取计算机名
       ///
       ///
       public string GetComputerName()
       {
           return Environment.MachineName;
       }
       ///
       /// 操作系统类型
       ///
       ///
       public string GetSystemType()
       {
           string st = "";
           ManagementClass mc = new ManagementClass("Win32_ComputerSystem");
           ManagementObjectCollection moc = mc.GetInstances();
           foreach (ManagementObject mo in moc)
           {
               st = mo["SystemType"].ToString();
           }
           return st;
       }
       ///
       /// 物理内存
       ///
       ///
       public string GetPhysicalMemory()
       {
           string st = "";
           ManagementClass mc = new ManagementClass("Win32_ComputerSystem");
           ManagementObjectCollection moc = mc.GetInstances();
           foreach (ManagementObject mo in moc)
           {
               st = mo["TotalPhysicalMemory"].ToString();
           }
           return st;
       }

类似地,有:  
显卡: Win32_VideoController , PNPDeviceID      
声卡: Win32_SoundDevice ,PNPDeviceID
CPU: Win32_Processor- 版本信息 Version, 名称信息Name, 制造厂商Manufacturer
主板: Win32_BaseBoar-型号 Produc, 编号 SerialNumber, 制造厂商 Manufacturer

WQL查询语句:
// 网卡原生MAC地址
"SE    LECT * FROM Win32_NetworkAdapter WHERE (MACAddress IS NOT NULL) AND (NOT (PNPDeviceID LIKE 'ROOT%'))",
L"PNPDeviceID",
// 硬盘序列号
"SE    LECT * FROM Win32_DiskDrive WHERE (SerialNumber IS NOT NULL) AND (MediaType LIKE 'Fixed hard disk%')",
L"SerialNumber",
// 主板序列号
"SE    LECT * FROM Win32_BaseBoard WHERE (SerialNumber IS NOT NULL)",
L"SerialNumber",
// 处理器ID
"SE    LECT * FROM Win32_Processor WHERE (ProcessorId IS NOT NULL)",
L"ProcessorId",
// BIOS序列号
"SE    LECT * FROM Win32_BIOS WHERE (SerialNumber IS NOT NULL)",
L"SerialNumber",
// 主板型号
"SE    LECT * FROM Win32_BaseBoard WHERE (Product IS NOT NULL)",
L"Product",
// 网卡当前MAC地址
"SE    LECT * FROM Win32_NetworkAdapter WHERE (MACAddress IS NOT NULL) AND (NOT (PNPDeviceID LIKE 'ROOT%'))",
L"MACAddress",
5月前 #2楼
游客组