![]() |
|
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. 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 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. |