[C+P] How to get HWID for bubbs dll's

[cosconub]

well he choobed (no offence bubb) and he made it return("1337")

so here his how to fix it...

Includes

[PHP]
Imports System.Text, System.Security.Cryptography
Imports System.Management, Microsoft.Win32
[/PHP]

Then add this code above the Public class\
[PHP]
Module MD5
Function GenerateHash(ByVal SourceText As String) As String
Dim Ue As New UnicodeEncoding()
Dim ByteSourceText() As Byte = Ue.GetBytes(SourceText)
Dim Md5 As New MD5CryptoServiceProvider()
Dim ByteHash() As Byte = Md5.ComputeHash(ByteSourceText)
Return Convert.ToBase64String(ByteHash)
End Function
End Module
[/PHP]

Replace Return("1337") with this code

[PHP]
Dim key1 As RegistryKey
key1 = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microso ft\Windows NT\CurrentVersion", False)
Dim key2 As RegistryKey
key2 = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microso ft\Cryptography", False)
Dim DELProduct As Object
DELProduct = Replace(key1.GetValue("ProductId"), "-", "")
Dim DELGUID As Object
DELGUID = Replace(key2.GetValue("MachineGUID"), "-", "")
HWID = MD5.GenerateHash((DELProduct.ToString & DELGUID.ToString))
Return HWID
[/PHP]


build and your good.

Credits: DeToX(jordan)

[Jason]

For the record, his name is BLubb not Bubb

[Blubb1337]

Easy to fix, just didn't fix it cuz I forgot since I worked on my desktop w/o ********* and any snippet.