得到硬盘序列号和cpu序列号
Dim obj As Object
Set obj = CreateObject("RegCheckPrj.RegPsdPrjCls")
disnum = obj.GetDiskNumber("c:\") '得到硬盘序列号
cpunum = obj.GetCpuNumber '得到cpu序列号
Email:bigboyli@126.com
/2013/0110/20130110033212136.rar
补充:软件开发 , Vb ,
Dim obj As Object
Set obj = CreateObject("RegCheckPrj.RegPsdPrjCls")
disnum = obj.GetDiskNumber("c:\") '得到硬盘序列号
cpunum = obj.GetCpuNumber '得到cpu序列号
补充:软件开发 , Vb ,