易语言借助DLL取硬盘信息源码

借助DLL取硬盘信息

系统结构:ReadPhysicalDriveInNT,ReadDrivePortsInWin9X,getHardDriveComputerID,IsWinNT,

======窗口程序集1
| |
| |------ _按钮1_被单击
| |
| |
======调用的Dll
| |
| |---[dll]------ ReadPhysicalDriveInNT
| |
| |---[dll]------ ReadDrivePortsInWin9X
| |
| |---[dll]------ getHardDriveComputerID
| |
| |---[dll]------ IsWinNT

调用的DLL命令:

.DLL命令 ReadPhysicalDriveInNT, 整数型, "DiskID.dll", "ReadPhysicalDriveInNT"
.参数 driveID, 整数型
.参数 buffer, ModalNumber, 传址
.参数 bufLen, 整数型

.DLL命令 ReadDrivePortsInWin9X, 整数型, "DiskID.dll", "ReadDrivePortsInWin9X"
.参数 driveID, 整数型
.参数 buffer, ModalNumber, 传址
.参数 bufLen, 整数型

.DLL命令 getHardDriveComputerID, 整数型, "DiskID.dll", "getHardDriveComputerID"

.DLL命令 IsWinNT, 逻辑型, "DiskID.dll", "IsWinNT"