Drive Information

[Guest]

How do I find information on a Drive such as Manufacturer, etc. I know how
to get the Drive Type, Size, etc. but not the information the appears in the
Properties Window when you right click on a Drive.

 

[Cor Ligthert]

Dennis,

That should be in the sample I have placed in a message to you.



Cor

 

[Cor Ligthert]

Doh,

Sorry Dennis, wrong readed.

Cor

 

[Cor Ligthert]

However when you change that like this (LogicalDrive to DiskDrive), you
should not be far from what you want.

\\\
Dim searcher As New ManagementObjectSearcher _
("SELECT * FROM Win32_DiskDrive")
Dim ManObjOp As ManagementObject
If searcher.Get.Count > 0 Then
For Each ManObjOp In searcher.Get
Dim win32 As String = "Win32_DiskDrive='" &
ManObjOp("Name").ToString & "'"
Dim ManObjLogD As New ManagementObject(win32)
For Each diskProperty As PropertyData In
ManObjLogD.Properties
If Not diskProperty.Value Is Nothing Then
Console.WriteLine _
("{0} = {1}", diskProperty.Name, diskProperty.Value)
End If
Next
Next
End If
///
I hope this helps?

Cor

 

[Guest]

I got it to working but didn't see the Disk Manufacturer's name in the
propertys. I'll try it again. Thanks. I'll let you know how it works out.