Sinisterly
HWID Grabber (Example Code) - Printable Version

+- Sinisterly (https://sinister.li)
+-- Forum: Coding (https://sinister.li/Forum-Coding)
+--- Forum: Visual Basic & .NET Framework (https://sinister.li/Forum-Visual-Basic-NET-Framework)
+--- Thread: HWID Grabber (Example Code) (/Thread-HWID-Grabber-Example-Code)



HWID Grabber (Example Code) - ViolentReality - 08-15-2013

Notice: I stumbled upon some of my old sources I put together and released awhile ago on various forums, I figured I may as well post them on here.


[Image: Untitled-24.png]

HWID Grabber (Processor ID)

[ Download Source ]



RE: HWID Grabber (Example Code) - zosoftnet - 08-15-2013

I had done the same : Dim obj As ManagementObject
Dim enumerator As ManagementObjectEnumerator = Nothing
Dim objsrc As ManagementObjectSearcher = New ManagementObjectSearcher("select * from Win32_Processor")
Dim objcol As ManagementObjectCollection = objsrc.Get()
Using enumerator
If (Not enumerator.MoveNext()) Then
enumerator = objcol.GetEnumerator()
While True
If (enumerator = Nothing) Then
Exit While
End If
obj = DirectCast(enumerator.Current, ManagementObject)
Me.TextBox1.Text = Conversions.ToString(obj("ProcessorID"))
End While
End If
End Using
obj.Dispose()
objcol.Dispose()
objsrc.Dispose()

And the Nic !! http://www.hackforums.net/showthread.php?tid=2354614


RE: HWID Grabber (Example Code) - ViolentReality - 08-15-2013

(08-15-2013, 03:57 PM)zosoftnet Wrote: I had done the same : Dim obj As ManagementObject

Code:
Dim enumerator As ManagementObjectEnumerator = Nothing Dim objsrc As ManagementObjectSearcher = New ManagementObjectSearcher("select * from Win32_Processor") Dim objcol As ManagementObjectCollection = objsrc.Get() Using enumerator If (Not enumerator.MoveNext()) Then enumerator = objcol.GetEnumerator() While True If (enumerator = Nothing) Then Exit While End If obj = DirectCast(enumerator.Current, ManagementObject) Me.TextBox1.Text = Conversions.ToString(obj("ProcessorID")) End While End If End Using obj.Dispose() objcol.Dispose() objsrc.Dispose()

And the Nic !! http://www.hackforums.net/showthread.php?tid=2354614

I posted my original thread before that one.
http://www.hackforums.net/showthread.php?tid=2083012

I have been using this code since I started in 2011.