Ola fiz um software e preciso gerar algum modo de criar um chave de instacao para esse software, que mesmo que se o usuario fizer uma imagem e jogar em outra maquina o software reconheca isso. Qual a melhor maneira ?
Monstar a chave baseada em algum componente do computador? (HD,Serial da Placa?). preciso que seja uma instalacao unica mesmo
''captura a série do hd Dim searcher2 As New ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive") Dim hdCollection2 As New ArrayList() Dim Serial As String = "" Dim Serial2 As String = ""
For Each wmi_HD As ManagementObject In searcher2.[Get]()
Dim hd As New HardDrive()
hd.Model = wmi_HD("Model").ToString()
hd.Type = wmi_HD("InterfaceType").ToString()
hdCollection2.Add(hd) Next
searcher2 = New ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia")
Dim i As Integer = 0
For Each wmi_HD As ManagementObject In searcher2.[Get]()
Dim hd As HardDrive = DirectCast(hdCollection2(i), HardDrive)
'Pegando o Serial
If wmi_HD("SerialNumber") Is Nothing Then hd.SerialNo = "None" Serial = "Não consta" Else hd.SerialNo = wmi_HD("SerialNumber").ToString() Serial = wmi_HD("SerialNumber").ToString()
