Tuesday, July 5, 2011

GET PROSSESOR ID,MOTHERBOARD ID IN VB.NET

Firts add system.management dll in project
then

Imports System
Imports System.Management

Friend Function GetProcessorId() As String
Dim strProcessorId As String = String.Empty
Dim query As New SelectQuery("Win32_processor")
Dim search As New ManagementObjectSearcher(query)
Dim info As ManagementObject

For Each info In search.Get()
strProcessorId = info("processorId").ToString()
Next
Return strProcessorId + Format(Int(Rnd() * 10000), "0000")

End Function

===========MOTHER BOARD ID=================
Friend Function GetMotherBoardID() As String

Dim strMotherBoardID As String = String.Empty
Dim query As New SelectQuery("Win32_BaseBoard")
Dim search As New ManagementObjectSearcher(query)
Dim info As ManagementObject
For Each info In search.Get()

strMotherBoardID = info("SerialNumber").ToString()

Next
Return strMotherBoardID

End Function

No comments:

Post a Comment