• Home
 · 
• Windows API Call/Explanation
 · 
• Get Volume Information of disk drive using GetVolumeInformation API

Get Volume Information of disk drive using GetVolumeInformation API

Get Volume Information of disk drive using GetVolumeInformation API

Rate Get Volume Information of disk drive using GetVolumeInformation API

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim drvserialno As Long
Dim mydrvlabel As String * 256
Dim myfilesys As String * 256
Dim i As Long
Dim j As Long
Dim x As Long
x = GetVolumeInformation("C:\", mydrvlabel, 256, drvserialno, i, j, myfilesys, 256)
MsgBox "Label of C Drive is  " & mydrvlabel
MsgBox "It's serial number = " & Hex(serialno)
MsgBox "FileSystem = " & myfilesys
End
End Sub