You can check the real value with DeviceIoControl
As I said, I get the same thing as WMI (change G: to your drive letter (I must be Admin for C: drive on my PC)) =>
Dim nBytesReturned As Integer = 0
Dim hVolume As IntPtr = IntPtr.Zero
Dim sDriveName As String = String.Format("\\.\{0}", "G:")
hVolume = CreateFile(sDriveName, GENERIC_READ, FILE_SHARE_READ Or FILE_SHARE_WRITE, IntPtr.Zero, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, IntPtr.Zero)
If (hVolume <> -1) Then
Dim DeviceDescriptor As STORAGE_DEVICE_DESCRIPTOR = New STORAGE_DEVICE_DESCRIPTOR()
Dim PropertyQuery As STORAGE_PROPERTY_QUERY = New STORAGE_PROPERTY_QUERY()
PropertyQuery.PropertyId = STORAGE_PROPERTY_ID.StorageDeviceProperty
PropertyQuery.QueryType = STORAGE_QUERY_TYPE.PropertyStandardQuery
Dim nBytesPropertyQuery As Integer = Marshal.SizeOf(PropertyQuery)
Dim pPropertyQuery As IntPtr = Marshal.AllocHGlobal(nBytesPropertyQuery)
Marshal.StructureToPtr(PropertyQuery, pPropertyQuery, False)
Dim nBytesDeviceDescriptor As Integer = Marshal.SizeOf(DeviceDescriptor) + 2048
Dim pDeviceDescriptor As IntPtr = Marshal.AllocHGlobal(nBytesDeviceDescriptor)
Dim bDeviceIoControl As Boolean = DeviceIoControl(hVolume, IOCTL_STORAGE_QUERY_PROPERTY, pPropertyQuery, Marshal.SizeOf(GetType(STORAGE_PROPERTY_QUERY)), pDeviceDescriptor, nBytesDeviceDescriptor, nBytesReturned, Nothing)
Dim DeviceDescriptorRet As STORAGE_DEVICE_DESCRIPTOR = Marshal.PtrToStructure(pDeviceDescriptor, GetType(STORAGE_DEVICE_DESCRIPTOR))
Dim nSerialNumberOffset As UInteger = DeviceDescriptorRet.SerialNumberOffset
Dim pSerialNumber As IntPtr = IntPtr.Add(pDeviceDescriptor, CInt(nSerialNumberOffset))
Dim sSerialNumber As String = Marshal.PtrToStringAnsi(pSerialNumber)
Console.WriteLine("SerialNumber : {0}", sSerialNumber)
Marshal.FreeHGlobal(pDeviceDescriptor)
Marshal.FreeHGlobal(pPropertyQuery)
CloseHandle(hVolume)
End If
With declarations :
Public Const IOCTL_STORAGE_GET_DEVICE_NUMBER As Integer = &H2D1080
Public Const IOCTL_STORAGE_QUERY_PROPERTY As Integer = &H2D1400
<DllImport("Kernel32.dll", SetLastError:=True, CharSet:=CharSet.Unicode)>
Friend Shared Function CreateFile(ByVal lpFileName As String, ByVal dwDesiredAccess As Integer, ByVal dwShareMode As Integer, ByVal lpSECURITY_ATTRIBUTES As IntPtr, ByVal dwCreationDisposition As Integer, ByVal dwFlagsAndAttributes As Integer, ByVal hTemplateFile As IntPtr) As IntPtr
End Function
<DllImport("Kernel32.dll", SetLastError:=True, CharSet:=CharSet.Unicode)>
Friend Shared Function CloseHandle(hObject As IntPtr) As Boolean
End Function
Public Const FILE_SHARE_READ As Integer = 1
Public Const FILE_SHARE_WRITE As Integer = 2
Public Const FILE_SHARE_DELETE As Integer = 4
Public Const FILE_ATTRIBUTE_NORMAL As Integer = &H80
Public Const CREATE_NEW As Integer = 1
Public Const CREATE_ALWAYS As Integer = 2
Public Const OPEN_EXISTING As Integer = 3
Public Const OPEN_ALWAYS As Integer = 4
Public Const TRUNCATE_EXISTING As Integer = 5
<DllImport("Kernel32.dll", SetLastError:=True, CharSet:=CharSet.Auto)>
Public Shared Function DeviceIoControl(hDevice As IntPtr,
dwIoControlCode As Integer,
lpInBuffer As IntPtr,
nInBufferSize As Integer,
lpOutBuffer As IntPtr,
nOutBufferSize As Integer,
ByRef lpBytesReturned As Integer,
ByRef lpOverlapped As System.Threading.NativeOverlapped) As Boolean
End Function
<StructLayout(LayoutKind.Sequential)>
Public Structure STORAGE_DEVICE_DESCRIPTOR
Public Version As UInteger
Public Size As UInteger
Public DeviceType As Byte
Public DeviceTypeModifier As Byte
<MarshalAs(UnmanagedType.I1)>
Public RemovableMedia As Boolean
<MarshalAs(UnmanagedType.I1)>
Public CommandQueueing As Boolean
Public VendorIdOffset As UInteger
Public ProductIdOffset As UInteger
Public ProductRevisionOffset As UInteger
Public SerialNumberOffset As UInteger
Public BusType As STORAGE_BUS_TYPE
Public RawPropertiesLength As UInteger
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=1)>
Public RawDeviceProperties As Byte()
End Structure
Public Enum STORAGE_BUS_TYPE
BusTypeUnknown = &H0
BusTypeScsi = &H1
BusTypeAtapi = &H2
BusTypeAta = &H3
BusType1394 = &H4
BusTypeSsa = &H5
BusTypeFibre = &H6
BusTypeUsb = &H7
BusTypeRAID = &H8
BusTypeiScsi = &H9
BusTypeSas = &HA
BusTypeSata = &HB
BusTypeSd = &HC
BusTypeMmc = &HD
BusTypeVirtual = &HE
BusTypeFileBackedVirtual = &HF
BusTypeSpaces = &H10
BusTypeNvme = &H11
BusTypeSCM = &H12
BusTypeMax = &H13
BusTypeMaxReserved = &H7F
End Enum
<StructLayout(LayoutKind.Sequential)>
Public Structure STORAGE_PROPERTY_QUERY
Public PropertyId As STORAGE_PROPERTY_ID
Public QueryType As STORAGE_QUERY_TYPE
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=1)>
Public AdditionalParameters As Byte()
End Structure
Public Enum STORAGE_PROPERTY_ID
StorageDeviceProperty = 0
StorageAdapterProperty = 1
StorageDeviceIdProperty = 2
StorageDeviceUniqueIdProperty = 3
StorageDeviceWriteCacheProperty = 4
StorageMiniportProperty = 5
StorageAccessAlignmentProperty = 6
StorageDeviceSeekPenaltyProperty = 7
StorageDeviceTrimProperty = 8
StorageDeviceWriteAggregationProperty = 9
StorageDeviceDeviceTelemetryProperty = 10
StorageDeviceLBProvisioningProperty = 11
StorageDevicePowerProperty = 12
StorageDeviceCopyOffloadProperty = 13
StorageDeviceResiliencyProperty = 14
StorageDeviceMediumProductType = 15
StorageAdapterRpmbProperty = 16
StorageDeviceIoCapabilityProperty = 48
StorageAdapterProtocolSpecificProperty = 49
StorageDeviceProtocolSpecificProperty = 50
StorageAdapterTemperatureProperty = 51
StorageDeviceTemperatureProperty = 52
StorageAdapterPhysicalTopologyProperty = 53
StorageDevicePhysicalTopologyProperty = 54
StorageDeviceAttributesProperty = 55
StorageDeviceManagementStatus = 56
StorageAdapterSerialNumberProperty = 57
StorageDeviceLocationProperty = 58
End Enum
Public Enum STORAGE_QUERY_TYPE
PropertyStandardQuery = 0 ' Retrieves the descriptor
PropertyExistsQuery = 1 ' Used To test whether the descriptor Is supported
PropertyMaskQuery = 2 ' Used To retrieve a mask Of writeable fields In the descriptor
PropertyQueryMaxDefined = 3 ' use To validate the value
End Enum
Get serial number of USB Drive (correctly)
