Hi,
Add a reference to system.management.dll.
Dim moReturn As Management.ManagementObjectCollection
Dim moSearch As Management.ManagementObjectSearcher
Dim mo As Management.ManagementObject
moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_LogicalDisk where Name = 'C:'")
moReturn = moSearch.Get
For Each mo In moReturn
Dim VolumeName As String = mo("Name")
Dim SerialNumber As String = mo("Volumeserialnumber")
Dim strOut As String = String.Format("{0} - {1}", VolumeName, SerialNumber)
Debug.WriteLine(strOut)
Next
moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_Processor")
moReturn = moSearch.Get
For Each mo In moReturn
Dim strout As String = String.Format("{0} - {1}", mo("Name"),
mo("ProcessorID"))
Debug.WriteLine(strout)
Next
Ken
-----------------------
"scorpion53061" <Its the end of the world as we know
it@here.com> wrote in
message news:u7**************@TK2MSFTNGP11.phx.gbl...
If anybody knows how in the management class we could get a computers
serial
number that would be very helpful. I cannot seem to find the method.
Also in the hardware in your machine I can get the pieces but I am having
trouble with identifying numbers like serials or such. Does anyone have
ideas on this?