Guys selecting the instance of research "Win32_LogicalDisk" I can select the drive letter that interests me for control;
The problem is that by selecting the instance of research "Win32_DiskDrive" with the drive letter set for the control, I get the error in "Disk.Get()" "NO FOUND"
I can not figure out how to fix it, it seems a stupid thing should work both calls "Win32_LogicalDisk" and "Win32_DiskDrive"......:confused::confused::confused::ehh:
Code:
Private Sub SYS_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Serial.Text = GetDriveSerialNumber("E")
End sub
Public Function GetDriveSerial(ByVal DriveLetter As String) As String
Dim Disk As System.Management.ManagementObject = New System.Management.ManagementObject("Win32_LogicalDisk=""" & DriveLetter & ":""")
Disk.Get()
Dim SerialNumber As String = Disk("VolumeSerialNumber").ToString()
Serial.Text = SerialNumber
Return DriveLetter
End FunctionCode:
Private Sub SYS_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Model.Text = GetDriveModel("E")
End sub
Public Function GetDriveModel(ByVal DriveLetter As String) As String
Dim Disk As System.Management.ManagementObject = New System.Management.ManagementObject("Win32_DiskDrive=""" & DriveLetter & ":""")
Disk.Get()
Dim Model_Disk As String = Disk("Model").ToString()
Model.Text = Model_Disk
Return DriveLetter
End Function