FILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, 0, 0);
上面这段代码在win10下不好用了
-
等级
本版专家分：0结帖率 61.29% -
hDevice := CreateFile('\\.\PhysicalDrive0', GENERIC_READ or GENERIC_WRITE,
FILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, 0, 0);
上面这段代码在win10下不好用了展开阅读全文
-
等级
本版专家分：414 -
通过WMI获取网卡MAC地址、硬盘序列号、主板序列号、CPU ID、BIOS序列号
Delphi通过WMI获取系统信息
uses ActiveX, ComObj;
function GetWMIProperty(WMIType, WMIProperty: string): string;
var
Wmi, Objs, Obj: OleVariant;
Enum: IEnumVariant;
C: Cardinal;
begin
Wmi:= CreateOleObject('WbemScripting.SWbemLocator');
Objs := Wmi.ConnectServer('.','root/cimv2').ExecQuery('Select * from Win32_' + WMIType);
Enum := IEnumVariant(IUnknown(Objs._NewEnum));
Enum.Reset;
Enum.Next(1, Obj, C);
Obj := Obj.Properties_.Item(WMIProperty, 0).Value;
Result := Obj;
end;
// 获取硬盘序列号
ShowMessage(GetWMIProperty('DiskDrive', 'PNPDeviceID'));
// 获取BISO序列号
ShowMessage(GetWMIProperty('BIOS', 'SerialNumber'));
// 获取网卡MAC地址
ShowMessage(GetWMIProperty('NetworkAdapter', 'MACAddress'));
// 获取网卡序列号
ShowMessage(GetWMIProperty('NetworkAdapter', 'PNPDeviceID'));
// 获取CPU序列号
ShowMessage(GetWMIProperty('Processor', 'ProcessorId'));
也可以用同样的方法获得任意感兴趣的系统信息，比如正在运行的进程、账户信息等等。
更多WMI的信息参考：
http://www.microsoft.com/whdc/system/pnppwr/wmi/default.mspx
http://msdn2.microsoft.com/en-us/library/aa394572.aspx
-
等级
本版专家分：50583勋章
-
- 签到新秀 累计签到获取，不积跬步，无以至千里，继续坚持！
-
-
红花
2018年11月 Delphi大版内专家分月排行榜第一
2018年5月 Delphi大版内专家分月排行榜第一
2018年2月 Delphi大版内专家分月排行榜第一
2018年1月 Delphi大版内专家分月排行榜第一
2017年12月 Delphi大版内专家分月排行榜第一
2017年8月 Delphi大版内专家分月排行榜第一
2017年7月 Delphi大版内专家分月排行榜第一
2017年5月 Delphi大版内专家分月排行榜第一
2017年3月 Delphi大版内专家分月排行榜第一
2017年2月 Delphi大版内专家分月排行榜第一
2016年12月 Delphi大版内专家分月排行榜第一
2016年11月 Delphi大版内专家分月排行榜第一
2016年10月 Delphi大版内专家分月排行榜第一
2016年9月 Delphi大版内专家分月排行榜第一
2016年8月 Delphi大版内专家分月排行榜第一
2016年7月 Delphi大版内专家分月排行榜第一
2016年6月 Delphi大版内专家分月排行榜第一
2016年5月 Delphi大版内专家分月排行榜第一
2016年4月 Delphi大版内专家分月排行榜第一
2016年3月 Delphi大版内专家分月排行榜第一
2016年2月 Delphi大版内专家分月排行榜第一
2016年1月 Delphi大版内专家分月排行榜第一
2015年12月 Delphi大版内专家分月排行榜第一
2015年11月 Delphi大版内专家分月排行榜第一
2015年10月 Delphi大版内专家分月排行榜第一
2015年9月 Delphi大版内专家分月排行榜第一
2015年8月 Delphi大版内专家分月排行榜第一
2015年7月 Delphi大版内专家分月排行榜第一
2015年6月 Delphi大版内专家分月排行榜第一
2015年5月 Delphi大版内专家分月排行榜第一
2015年4月 Delphi大版内专家分月排行榜第一
2015年3月 Delphi大版内专家分月排行榜第一
2015年2月 Delphi大版内专家分月排行榜第一
2015年1月 Delphi大版内专家分月排行榜第一
2014年12月 Delphi大版内专家分月排行榜第一
2014年11月 Delphi大版内专家分月排行榜第一
-
-
黄花
2017年11月 Delphi大版内专家分月排行榜第二
2017年4月 Delphi大版内专家分月排行榜第二
2017年1月 Delphi大版内专家分月排行榜第二
2014年10月 Delphi大版内专家分月排行榜第二
2014年9月 Delphi大版内专家分月排行榜第二
-
-
GetWMIProperty('DiskDrive','SerialNumber') // 获得第一块硬盘的设备标示
-
等级
本版专家分：256
-
二三楼其实都是正解。
二楼是直接给出的代码，三楼则是给了个度娘手里有源码的函数名。
-
等级
本版专家分：444
-
收费的可以找我qq:171833017,可以应用于各种流行的开发语言，比如Delphi, C++Builder, C#, Visual C++, Visual Basic, Visual Basic.NET, PowerBuilder等
1.支持windows2000,xp及以上系统，支持64位操作系统，支持U盘/移动硬盘，不支持win98及以下操作系统。
2.仅需1个dll文件。
3.在win7/win8等系统下，无需管理员权限。
4.支持根据盘符获取硬盘的物理序号，支持获取磁盘类型。
5.支持获取硬盘温度、smart信息。
下载地址http://www.dxmylove.com/download/jyharddisk.zip
-
等级
本版专家分：4309勋章
-
- 黄花 2016年7月 Delphi大版内专家分月排行榜第二
-
-
二楼这方法简单好用，
以前cpuid都是用网上的汇编代码获取，多核的还来回变。
-
等级
本版专家分：1472 -
mark， 获取硬盘序列号。
-
等级
本版专家分：22
-
这段代码在win10下不好用了
- win10查看设备序列号、硬盘序列号、mac地址
2. 查看硬盘序列号 （1）打开cmd （2）执行diskpart命令，windows会打开一个新的cmd窗口 （3）执行list disk命令，cmd窗口会展示磁盘列表并排好序了 （4）依据排序执行查询命令：select disk 0, 代表选中第0个...
- 如何获取硬盘序列号
如何获取硬盘序列号？ 作者：cg1摘自：access911.net编辑：cg1更新日期：2003-8-2浏览人次： 2255 专题地址： [url]http://www.access911.net/?kbid;77FAB01E10DC[/url] 简述：如何获取硬盘序列号？ ...
- 硬盘序列号查看器，5种方式获取序列号。
由于保密要做计算机台账，需要登记很多电脑信息，很麻烦，我自己写了一个电脑基本信息查看器，包括操作系统类型（xp~win10),系统安装时间，ip地址，mac地址，电脑设备序列号（需要品牌电脑才有），硬盘序列号我在...
- C++获取CPU序列号，硬盘序列号（无需管理权限），网卡MAC地址，在vs2005环境下编译通过，win10，win7测试...
C++获取计算机的CPU序列号，硬盘序列号（无需管理权限），网卡MAC地址，在vs2005环境下编译通过，已在win10，win7系统测试通过。
- Windows下使用C++（Win32SDK）编程无需提权读取硬盘序列号（XP、Win7和Win10都可用）
在需要对计算机进行标识的...Windows下硬盘序列号的获取本身并不复杂，而关键在于如何在无需权限提升的情况下获取到硬盘序列号。为了解决这个问题，我也查了很多资料，基本上各大博客中贴出的都是需要权限提升的代码。
- 获取硬盘序列号Delphi7(win7xp 测试成功）
获取硬盘序列号Delphi7
- Windows c 获取cpu ,网卡,硬盘序列号，win10可用
已经封装成动态库形式，方便使用！ //标准C DLL导出格式 #ifndef _GETHARDINFO_H_ #define _GETHARDINFO_H_ #ifdef MYAPI_EXPORTS #define WIN32DLL_API __declspec...#define WIN32DLL_API __declspec(dllimport)
- 在windows下获取硬盘序列号（win7 32位，Windows Server 64位测试，希望在其他平台测试，遇到问题的网友...
#include <Windows.h> #include <stdio.h> // IOCTL控制码 // #define DFP_SEND_DRIVE_COMMAND CTL_CODE(IOCTL_DISK_BASE, 0x0021, METHOD_BUFFERED, FILE_READ_ACCESS | FILE_WRITE_ACCESS) // #de.....
- Delphi获取硬盘序列号(支持IDE和SCSI硬盘)
完美获取硬盘序列号，支持IDE和SCSI硬盘，支持各版本操作系统。
- VB6下如何获得硬盘序列号
来实现读取硬盘序列号，以下程序来源于网络，在winxp下可以正确获得，但在win7和win10下均无法获取： '============================================ '模块功能：取得硬盘的信息 '更新日期：2005/7/8 '调用方法...
- VS2015下测硬盘序列号源代码，win7/64位可用
vs2015工程，读取硬盘序列号，测试可用，包括固态盘。更改了原网络参考资源中与vs2015不兼容的问题，100%可用！
- 获取硬盘序列号，CPU，mac地址等信息 win7下也行
这篇是我引用 http://aigudao.net/?post=107 的。比较高兴
- 前端代码怎么获取电脑硬盘序列号_硬盘序列号查询工具_官方电脑版
硬盘序列号查询工具支持win7、win8等主流操作系统。华军软件园提供硬盘序列号查询工具软件的下载服务，下载硬盘序列号查询工具软件其他版本，请到华军软件园! 硬盘序列号查询工具软件简介 硬盘出厂序列号在全球都...
- hd获取硬盘序列号_小巧易用的硬盘工具软件HD Tune Pro
软件介绍HD Tune Pro是一款小巧易用的硬盘工具软件，HD Tune Pro其主要功能有硬盘传输速率...硬件/系统要求支持系统：本次提供软件版本支持64位的win7、win8.1、win10操作系统，支持32位的win7、win8.1以及win10操作...
- win7电脑设备序列号怎么查_win7硬盘序列号怎么看|win7查看硬盘序列号的方法
最近一些用户询问说win7硬盘序列号怎么看？一般硬盘序列号很多电脑爱好者都不会看，有时候公司或者实验室需要登记每个人电脑的硬盘序列号(也就是硬盘ID)，就需要查看硬盘序列号了。可以借助第三方软件进行查看，如果...
- 前端代码怎么获取电脑硬盘序列号_Win7 64+Python3.7获取计算机硬盘信息初探
一、需求由于最近负责电脑资产清查的工作，有100多台分散的电脑需要获得用户名、MAC地址、硬盘序列号、硬盘品牌一般方法：（1）查看系统用户名（2） 获取MAC地址 windos命令行使用ipconfig /all（3）使用Hdtune软件...
- c++ 获取硬盘序列号serialnumber
网上搜索一下，发现获取硬盘序列号的代码遍地都是，但很多是错误的。典型代表就是使用GetVolumeInformation函数获取序列号。这种方法获取的是卷的序列号，即Volume Serial Number。硬盘格式化后，这种序列号将发生...
- hd获取硬盘序列号_C#获取硬盘序列号的问题小结
具体问题是这样的：我用下面这段获取硬盘型信息的代码做成的exe文件，在机子上测试的时候，出现直接双击运行和用管理员身份运行结果不一样的情况，这个问题该怎么解决？public static String GetHardWareId(){String...
- C#获取硬盘序列号
using System; using System.IO; using System.Runtime.InteropServices;... using Microsoft.Win32; namespace Wjb.ReadOrWriteIniAndReg { /// <summary> /// HardDiskVal 的摘要说明。 /// ...
- Delphi Windows7环境获取硬盘序列号(支持SSD和SCSI硬盘).rar
Delphi 获取硬盘序列号(支持SSD和SCSI硬盘) ，支持Windows7系统，只是获取... 本源码无使用第三方控件，在Delphi7.0环境下可直接编译源码，运行程序后，单击窗口中的“Get HardDisk ID”按钮，即可获取到硬盘序列号。
- Delphi 读取硬盘序列号
Delphi 读取硬盘序列号 包含源码 （窗体加载事件弹出序列号） 在D7环境下写的
- 获取硬盘序列号 CPU MAC win7 可用
来自国外牛人的代码，兼容win7 。可获取硬盘序列号，CPU，Mac 地址，等信息。
- win7中vc++如何获取硬盘序列号
我想获取win7下计算机硬盘的序列号，用来做软件加密，求各位大神帮帮忙啊！！！！！！！
- XE 获取硬盘序列号
function TdmCommonFun.GetIdeSerialNumber: AnsiString; stdcall;const IDENTIFY_BUFFER_SIZE = 512;type TIDERegs = packed record bFeaturesReg: Byte; // Used for specifying SMART "...
- hd获取硬盘序列号_获取硬盘序列号的代码
sSerialNumber(19) As BytewBufferType As IntegerwBufferSize As IntegerwECCSize As IntegersFirmwareRev(7) As BytesModelNumber(39) As BytewMoreVendorUnique As IntegerwDoubleWordIO As IntegerwCapabilities...
- DOS 获取硬盘序列号
使用diskpart命令，Win+R键运行cmd，进入命令行界面： 1.diskpart 2.list disk 查看有几块硬盘 3.select disk 0 选择第一块硬盘 4.detail disk 显示选择的硬盘详细信息，显示的第一行是硬盘型号，第二行ID是序列号。...
- C#利用win32 Api 修改本地系统时间、获取硬盘序列号
主要介绍了C#利用win32 Api 修改本地系统时间、获取硬盘序列号的方法及代码分享,需要的朋友可以参考下
- Python获取硬件信息(硬盘序列号,CPU序列号)
原文衔接 ...pip install wmi pip install pywin32 ...# # 硬盘序列号 for physical_disk in c.Win32_DiskDrive(): print(physical_disk.SerialNumber) # CPU序列号 for cpu in c.Win32_Processor(): p
- delphi 获取硬盘序列号、cpu号、bios号、网卡号
delphi 获取硬盘序列号、cpu号、bios号、网卡号2009-06-15 9:45delphi 获取硬盘 序列号function GetIdeNum: String;type TSrbIoControl = packed record HeaderLength : ULONG; Signature : Array[0..7] of Char; ...
- .NET获取硬盘序列号的几个方法
最近作软件注册，收集了很多.NET相关...1，使用WMI方式，有的机器根本取不到硬盘序列号，有的方式在Vista下面会报错。 常用的使用WMI的方式主要有下面一些方式： classHardDrive { privatestringmodel=null; ...