Hard Disk Manufacturer Serial Number Vb6 String

Posted on by admin
Hard Disk Manufacturer Serial Number Vb6 StringHard Disk Manufacturer Serial Number Vb6 String

That's correct, nagaraj -- the serial number returned by GetVolumeInformation is OS supplied and will change when that drive is partitioned. What you are looking for is a way to retrieve that data from the driver. Although I can't help you with the VB part here is the API call you should check out: DeviceIoControl(., IOCTL_CHANGER_GET_PRODUCT_ DATA. ) -- not sure about the IOCTL_CHANGER_GET_PRODUCT_ DATA. The DeviceIoControl still gives you low-level access to devices so that should get you going..f.

Programmatically obtain the hard disk's. 'To programmatically obtain the hard disk's serial number that the manufacturer. For VB code you will have. How can I read HDD volume serial number using VB 6 but without. Browse other questions tagged vb6 hdd serial-number or ask. Serial number of Hard Disk. One method programmers have used since the DOS era was to bind their software to the Hard Drive Volume Serial Number. This is not a good choice, as later we all find out that every time we format the same hard drive, a new Volume Serial Number is generated. A better solution is to get the Hard Drive Serial Number given by the Manufacturer.

And the code of the second link? Does it provide the correct serialnumber or not? Sub ShowDriveInfo(drvpath) Dim fs, d, s, t Set fs = CreateObject('Scripting.Fi leSystemOb ject') Set d = fs. Wavepad Full Version With Crack And Keygen. Rondo Veneziano Best Of Rar on this page. GetDrive(fs.GetDriveNam e(fs.GetAb solutePath Name(drvpa th))) Select Case d.DriveType Case 0: t = 'Unknown' Case 1: t = 'Removable' Case 2: t = 'Fixed' Case 3: t = 'Network' Case 4: t = 'CD-ROM' Case 5: t = 'RAM Disk' End Select s = 'Drive ' & d.DriveLetter & ': - ' & t s = s & vbCrLf & 'SN: ' & d.SerialNumber MsgBox s End Sub.