How to get Computer Details

[aaron_buangon]

Gud day to everyone...
I am a newbie in this programming language...

I know all og you here are brilliant and genius programmers and having
brilliant experiances..

I'd be thankful if someone can help me with my problem..

I am making a program of getting MAC address, IP addresses, Motherboard details and other cpu info...

please anyone can help me because i have no idea of where to start...


thanx

 

[MattP]

Processor from Registry

My.Computer.Registry.LocalMachine.OpenSubKey("HARDWARE\DESCRIPTION\System\CentralProcessor\0").GetValue("ProcessorNameString").ToString.Trim()

IP Address

System.Net.Dns.GetHostEntry("127.0.0.1").AddressList(1).ToString()

MAC Address

	Private Function getMACAddress() As List(Of String)
		Dim macList As New List(Of String)

		Dim mc As New ManagementClass("Win32_NetworkAdapterConfiguration")
		For Each mo As ManagementObject In mc.GetInstances()
			If mo.Item("IPEnabled") = True Then
				macList.Add(mo.Item("MacAddress").ToString())
			End If
		Next

		Return macList
	End Function

Motherboard

	Private Function getMoboInfo() As String
		Dim mobo As String = ""

		Dim mc As New ManagementClass("Win32_MotherBoardDevice")
		For Each mo As ManagementObject In mc.GetInstances()
			mobo = mo.Item("Name").ToString()
			Exit For
		Next

		Return mobo

	End Function