Hi,
Add a reference to system.manageme nt.dll.
Dim moReturn As Management.Mana gementObjectCol lection
Dim moSearch As Management.Mana gementObjectSea rcher
Dim mo As Management.Mana gementObject
moSearch = New Management.Mana gementObjectSea rcher("Select * from
Win32_LogicalDi sk'")
moReturn = moSearch.Get
For Each mo In moReturn
Dim VolumeName As String = mo("Volumename" )
Dim SerialNumber As String = mo("Volumeseria lnumber")
Dim strOut As String = String.Format(" {0} - {1}", VolumeName, SerialNumber)
Debug.WriteLine (strOut)
Next
moSearch = New Management.Mana gementObjectSea rcher("Select * from
Win32_Processor ")
moReturn = moSearch.Get
For Each mo In moReturn
Debug.WriteLine (mo("ProcessorI D"))
Next
Ken
----------------
"Abubakar" <xv************ @yahoo.co.uk> wrote in message
news:01******** *************** *****@phx.gbl.. .
I have been trying to write a code that will enable me get
the serial number of the motherboard or harddrive on a
given system but no luck so far. Can any one out there
help me.