易语言取硬盘序列号源码

取硬盘序列号系统结构:ChangeByteOrder,hdid9x,hdidnt,GetHDID,DetectIDE,ByteArrToString,字符处理,GetVersionEx,CreateFile,DeviceIoControl1,DeviceIoControl,CloseHandle,CopyMemory1,CopyMemory,VarPtr, ======程序集1 || ||------_启动子程序 || ||------_临时子程序 || ||------ChangeByteOrder || ||------hdid9x || ||------hdidnt || ||------GetHDID || ||------DetectIDE || ||------ByteArrToString || ||------字符处理 || || ======窗口程序集1 || ||------_按钮1_被单击 || || ======调用的Dll || ||---[dll]------GetVersionEx || ||---[dll]------CreateFile || ||---[dll]------DeviceIoControl1 || ||---[dll]------DeviceIoControl || ||---[dll]------CloseHandle || ||---[dll]------CopyMemory1 || ||---[dll]------CopyMemory || ||---[dll]------VarPtr 调用的DLL命令: .DLL命令GetVersionEx,整数型,"kernel32","GetVersionExA" .参数LpVersionInformation,OSVERSIONINFO .DLL命令CreateFile,整数型,"kernel32","CreateFileA" .参数lpFileName,文本型 .参数dwDesiredAccess,整数型 .参数dwShareMode,整数型 .参数lpSecurityAttributes,整数型 .参数dwCreationDisposition,整数型 .参数dwFlagsAndAttributes,整数型 .参数hTemplateFile,整数型 .DLL命令DeviceIoControl1,整数型,"kernel32","DeviceIoControl",,易语言没有any类型的参数接口，只好分别做两个了 .参数hDevice,整数型 .参数dwIoControlCode,整数型 .参数lpInBuffer,TSENDCMDINPARAMS,,原any类型（变形体类型） .参数nInBufferSize,整数型 .参数lpOutBuffer,TSENDCMDOUTPARAMS,,原any类型（变形体类型） .参数nOutBufferSize,整数型 .参数lpBytesReturned,整数型 .参数lpOverlapped,OVERLAPPED .DLL命令DeviceIoControl,整数型,"kernel32","DeviceIoControl",,易语言没有any类型的参数接口，只好分别做两个了 .参数hDevice,整数型 .参数dwIoControlCode,整数型 .参数lpInBuffer,整数型,,原any类型（变形体类型） .参数nInBufferSize,整数型 .参数lpOutBuffer,TGETVERSIONOUTPARAMS,传址,原any类型（变形体类型） .参数nOutBufferSize,整数型 .参数lpBytesReturned,整数型 .参数lpOverlapped,OVERLAPPED .DLL命令CloseHandle,整数型,"kernel32","CloseHandle" .参数hObject,整数型 .DLL命令CopyMemory1,,"kernel32","RtlMoveMemory",,易语言没有any类型的参数接口，只好分别做两个了 .参数hpvDest,字节型,传址,原any类型（变形体类型） .参数hpvSource,字节型,传址,原any类型（变形体类型） .参数cbCopy,整数型 .DLL命令CopyMemory,,"kernel32","RtlMoveMemory",,易语言没有any类型的参数接口，只好分别做两个了 .参数hpvDest,TIDSECTOR,传址,原any类型（变形体类型） .参数hpvSource,字节型,传址,原any类型（变形体类型） .参数cbCopy,整数型 .DLL命令VarPtr,整数型,"GetVarPtr.Dll","VarPtr" .参数数据,整数型,传址