Service d'activation en VB.NET

Bonjour,

Je suis actuellement sur un projet de système de clé d'activation en ligne pour un de mes logiciels codé en VB.NET. J'ai réussi à mettre en place mon système qui est d'ailleurs fonctionnel. Le seul problème que je rencontre est que choisir comme identifiant pour le PC afin de le reconnaître de façon unique (pour l'instant je récupère le n° physique du HDD mais avec quelques problèmes^^). Je souhaitais donc connaître vos avis sur quoi choisir.

Et enfin j'aimerais aussi savoir si enregistrer la variable disant que le produit est activé dans le registre Windows est une bonne idée. Si oui auriez vous un ou deux tutos sur la maîtrise du registre ?

Merci d'avance,

Cordialement,

Louis :)

l'id du cpu est mieux (un dd ca se change plus souvent)
wmi et wmi code creator t'aideront pour ca

après enregistrer simplement si c'est activé est un peu light à mon gout, il faut crypter quelque chose contenu l'id cpu et le fait que c'est activé

Ok merci bcp ! Je vais m'orienter vers le cpu. Pour la sécurité je compte également vérifier tous les jours (si le soft s'ouvre et qu'il y a internet) que le clé est toujours valide. Pour le cryptage je vais regarder ceci mais d'abord il faut que je comprenne le vrai fonctionnement du registre et comment l'utiliser en VB.

[EDIT]
Bonsoir,
J'ai trouvé comment obtenir le n° de série du CPU via la fonction suivante :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Public Function GetCPUID() As String Dim computer As String = "." Dim wmi As Object = GetObject("winmgmts:" & _ "{impersonationLevel=impersonate}!\\" & _ computer & "\root\cimv2") Dim processors As Object = wmi.ExecQuery("Select * from " & _ "Win32_Processor")   Dim cpu_ids As String = "" For Each cpu As Object In processors cpu_ids = cpu_ids & ", " & cpu.ProcessorId Next cpu If cpu_ids.Length > 0 Then cpu_ids = _ cpu_ids.Substring(2)   Return cpu_ids End Function

---

J'obtient ceci : BFEBFBFF0001067A
Je voulais juste savoir si cela vous paraît cohérent ou si j'ai récupéré autre chose :D. Je vais à présent m'attaquer au registre.

ca ressemble à ce que j'avais aussi ^^
c'est de l'hexadecimal, tu peux le transformer en octets ou le laisser en string

Bonsoir,
J'ai réussi à utiliser le registre pour enregistrer les clés mais ce code n'a pas fonctionné sur un PC W8 (le mien est un W7 64bits). Auriez-vous une idée ?
Voici le code en question :

Code:

---

1 2 3 4 5 6

Dim Registre As Microsoft.Win32.RegistryKey = Nothing Registre = Microsoft.Win32.Registry.LocalMachine Registre.CreateSubKey(PathRegistre).SetValue("Key", CleCryptee) Registre.CreateSubKey(PathRegistre).SetValue("PcIdent", IdPcCrypte) Registre.CreateSubKey(PathRegistre).SetValue("Registrant", EmailCrypte) Registre.CreateSubKey(PathRegistre).SetValue("License", AES_Encrypt(Now & "+-+Full", CryptageKey))

---

Note : Sur le pc W8 rien ne s'est créé. Ni la clé ni les variables.

Merci d’avance

Citation:

---

Envoyé par louis67

Bonsoir,
Note : Sur le pc W8 rien ne s'est créé. Ni la clé ni les variables.

Merci d’avance

---

Je n'ai pas Windows 8, mais je soupçonne un problème de droit d'accès en écriture. Je ne sais pas ce que cela va donner, mais tu ne perds rien à essayer de lancer VB en tant qu'administrateur avant de relancer le débogage.

Je ne sais pas si c'est la même chose sur Windows 8, mais l'éditeur de registre de Windows 7 lancé comme administrateur permet de modifier les attributs de sécurité des clefs du registre.

Bonjour,
En effet ce sont bien les droits qui empêchent la création dans le registre (Note : dans HKEY_LOCAL_MACHINE). Y a-t-il alors un moyen de forcer le lancement du soft en administrateur ? Je veux dire sans que l'utilisateur n'ait à toucher à quoi que ce soit.

Merci d'avance,

Louis

Bonjour,

Tu peux toujours télécharger et regarder cet exemple-là. Il suffit de cliquer oui à la question pour autoriser l'utilisation en mode administrateur.


http://code.msdn.microsoft.com/VBUAC...ation-39b7606f

Bonjour,
Désolé pour la réponse tardive. En effet le projet VBUAC répond exactement à mes besoins. Au lancement du programme d'activation je vérifie que le user est Admin et si il l'est je vérifie que le soft s'exécute en admin sinon je le force.

Cordialement,