易语言枚举U盘序列号源码

系统结构:取硬件信息_序列号,打开USB类设备信息,取下一个U盘,关闭USB类设备信息,根据设备信息判断是否U盘,DLL_SetupDiGetDeviceInstanceId,DLL_SetupDiGetClassDevs,DLL_SetupDiEnumDeviceInfo,DLL_SetupDiDestroyDeviceInfoList,DLL_SetupDiGetDeviceRegistryProperty,DLL_SetupDiGetDeviceRegistryProperty_text,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 取硬件信息_序列号
           |  |
           |  |------ 打开USB类设备信息
           |  |
           |  |------ 取下一个U盘
           |  |
           |  |------ 关闭USB类设备信息
           |  |
           |  |------ 根据设备信息判断是否U盘
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   DLL_SetupDiGetDeviceInstanceId
           |  |
           |  |---[dll]------   DLL_SetupDiGetClassDevs
           |  |
           |  |---[dll]------   DLL_SetupDiEnumDeviceInfo
           |  |
           |  |---[dll]------   DLL_SetupDiDestroyDeviceInfoList
           |  |
           |  |---[dll]------   DLL_SetupDiGetDeviceRegistryProperty
           |  |
           |  |---[dll]------   DLL_SetupDiGetDeviceRegistryProperty_text

调用的DLL命令:

.DLL命令 DLL_SetupDiGetDeviceInstanceId, 逻辑型, "Setupapi.dll", "SetupDiGetDeviceInstanceIdA"
    .参数 DeviceInfoSet, 整数型
    .参数 DeviceInfoData, _设备信息数据
    .参数 DeviceInstanceId, 文本型
    .参数 DeviceInstanceIdSize, 整数型
    .参数 RequiredSize, 整数型, 传址

.DLL命令 DLL_SetupDiGetClassDevs, 整数型, "Setupapi.dll", "SetupDiGetClassDevsA"
    .参数 ClassGuid, 字节集, , 指向GUID的缓冲区
    .参数 Enumerator, 文本型
    .参数 hwndParent, 整数型
    .参数 Flags, 整数型

.DLL命令 DLL_SetupDiEnumDeviceInfo, 逻辑型, "Setupapi.dll", "SetupDiEnumDeviceInfo"
    .参数 hDeviceInfoSet, 整数型, , 设备信息句柄
    .参数 MemberIndex, 整数型, , 索引
    .参数 DeviceInfoData, _设备信息数据, , _设备信息数据

.DLL命令 DLL_SetupDiDestroyDeviceInfoList, 逻辑型, "Setupapi.dll", "SetupDiDestroyDeviceInfoList"
    .参数 hDeviceInfoSet, 整数型

.DLL命令 DLL_SetupDiGetDeviceRegistryProperty, 逻辑型, "Setupapi.dll", "SetupDiGetDeviceRegistryPropertyA"
    .参数 hDeviceInfoSet, 整数型
    .参数 DeviceInfoData, _设备信息数据
    .参数 Property, 整数型
    .参数 PropertyRegDataType, 整数型
    .参数 PropertyBuffer, 整数型
    .参数 PropertyBufferSize, 整数型
    .参数 RequiredSize, 整数型, 传址

.DLL命令 DLL_SetupDiGetDeviceRegistryProperty_text, 逻辑型, "Setupapi.dll", "SetupDiGetDeviceRegistryPropertyA"
    .参数 hDeviceInfoSet, 整数型
    .参数 DeviceInfoData, _设备信息数据
    .参数 Property, 整数型
    .参数 PropertyRegDataType, 整数型
    .参数 PropertyBuffer, 文本型
    .参数 PropertyBufferSize, 整数型
    .参数 RequiredSize, 整数型, 传址