利用vb 如何读出硬盘码?

解决方案 »

  1.   

    硬盘序列号吗?http://www.21tx.com/src/vb/other/000140810090897.htm
      

  2.   

    http://www.applevb.com/libvb.htm斑竹用VC编写的DLL,可以获得硬盘的型号、序列号以及计算机 ID,带Delphi的源程序,在Win2K下通过,但是没有在Win9X下试过,感兴趣的朋友可以在Win9X 下试一下,或者编写一个VB的范例。
    函数以及定义:
    function ReadPhysicalDrive(driveID:integer;buffer:Pointer;bufLen:integer):integer; stdcall; external 'DiskID.dll' name 'ReadPhysicalDriveInNT';
    获得WinNT下的硬盘型号以及序列号。参数driveID为硬盘的位置,IDE1上的主盘为0,类推到IDE2上的从盘的driveID为3。
    function ReadPhysicalDrive9X(driveID:integer;buffer:Pointer;bufLen:integer):integer; stdcall; external 'DiskID.dll' name 'ReadDrivePortsInWin9X'; 
    获得Win9X下的硬盘型号以及序列号。参数同上
    function getHardDriveComputerID:int64; stdcall; external 'DiskID.dll' name 'getHardDriveComputerID';
    获得计算机的ID 
     下载(180K) http://expert.csdn.net/Expert/topic/1839/1839841.xml?temp=.4321405
      

  3.   

    http://expert.csdn.net/expert/topic/934/934383.xmlhttp://www.dapha.net/vb/list.asp?id=1886
      

  4.   

    正宗的
    http://expert.csdn.net/Expert/topic/1526/1526713.xml?temp=.2067835