[VB.NET] Non-Pub Programm mit HD ID schützen

Hallo, ich habe ein Programm gecodet, dieses möchte ich jetzt mit der Hardware ID schützen, also dass jeder User bzw. nicht alle das Programm benutzen können, gibts da en Souce oder wie funktioniert das? :)

P.S. Werde das Programm mal später hochladen, habe eine Public Version davon.

Gruß :)

Slawa

Danke :p

Hey such dir doch selber aus was du willst.. du kannst nehmen was immer du willst.. du könntest auch die Anzahl der Zeichen vom Benutzernamen auslesen und mal 4 rechnen ;)

Schau dir das mal an http://www.codeproject.com/KB/system...formation.aspx

Kannst auch den Computernamen dazunehmen.. wie gesagt kannst aus fast allem nen Key machen.. andere Frage ist dann sicherlich wie cracksicher das ist ;)
Wenn du nichts in die Richtung machst kann jeder Horst das umgehen.

das mit dem user-/Computernamen ist eine variante, ist asber nicht so gut, wenn dein kunde mal seinen rechner neu formatiert.
Ein mal google wirkt wunder:

Code:

---

            Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia")
            For Each wmi_HD As ManagementObject In searcher.Get()
                ListBox1.Items.Add((wmi_HD("SerialNumber")).ToString())
            Next

---

Hier ist dogar eine ganze klasse:

Code:

---

Imports System
Imports System.Management

Public Class clsComputerInfo

    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

    End Function

    Friend Function GetMACAddress() As String

        Dim mc As ManagementClass = New ManagementClass("Win32_NetworkAdapterConfiguration")
        Dim moc As ManagementObjectCollection = mc.GetInstances()
        Dim MACAddress As String = String.Empty
        For Each mo As ManagementObject In moc

            If (MACAddress.Equals(String.Empty)) Then
                If CBool(mo("IPEnabled")) Then MACAddress = mo("MacAddress").ToString()

                mo.Dispose()
            End If
            MACAddress = MACAddress.Replace(":", String.Empty)

        Next
        Return MACAddress
    End Function

    Friend Function GetVolumeSerial(Optional ByVal strDriveLetter As String = "C") As String

        Dim disk As ManagementObject = New ManagementObject(String.Format("win32_logicaldisk.deviceid=""{0}:""", strDriveLetter))
        disk.Get()
        Return disk("VolumeSerialNumber").ToString()
    End Function

    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
 
End Class

---

Mfg Krusty

Super sowas hat mich immer schon Interressiert

Zitat:

---

Zitat von Slawa

Hallo, ich habe ein Programm gecodet, dieses möchte ich jetzt mit der Hardware ID schützen, also dass jeder User bzw. nicht alle das Programm benutzen können, gibts da en Souce oder wie funktioniert das?

---

http://free-hack.com/showthread.php?t=32761 Bitteschön ;)

mich interessiert jetzt was für ein tool das sein soll? muss ja was ganz besonderes sein wenn du es mit nem key versehen willst

Ich würde einfach mal auf Geld verdienen tippen ;)