Création trial version

Version imprimable

10/09/2014, 21h47
Gildas22

Création trial version

Bonsoir,

Je suis sur le développement du code pour effectuer une version trial de mon application. J'ai trouver des exemples de codes utilisant "les paramètres" de l'application

Cette solution est efficace si le déploiement de l'application est faite en fournissant seulement l’exécutable de l'application mais si le déploiement est réalisé avec un setup d'installation de l'application et des composants nécessaires alors le code réalisant la partie trial est inefficace si l'application est désinstallée puis réinstallée après le délai de fin de la période d'essai.

Je pensais développer une solution qui utiliserai la base de registre mais en parcourant la base de registre (HKEY_LOCAL_MACHINE/SOFTWARE/) de mon pc où j'ai installé l'application via le setup je ne trouve pas de dossier portant le nom de mon application.

Est-ce normal ?

Merci de votre aide.
11/09/2014, 06h59
wallace1

Bonjour cela dépends comment est paramétré ton assistant d'installation mais normalement voici les emplacements depuis lesquels sont disponibles les informations d'applications installées :

A parcourir si ton OS est un 32 bits :

Code:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall

A parcourir en complément (de la clé 32bits) si ton OS est un 64 bits :

Code:

HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall

A+
11/09/2014, 10h06
Gildas22

Citation:

Envoyé par wallace1

Bonjour cela dépends comment est paramétré ton assistant d'installation mais normalement voici les emplacements depuis lesquels sont disponibles les informations d'applications installées :

A parcourir si ton OS est un 32 bits :

Code:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall

A parcourir en complément (de la clé 32bits) si ton OS est un 64 bits :

Code:

HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall

A+

Bonjour wallace1,

Merci pour ta réponse.

Mon OS est un 32 bits je suis donc aller voir dans la base de registre :

Code:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall

Cependant je n'ai trouvé aucune trace d'installation de mon application.

L'explication vient peut-être du paramétrage de mon assistant d'installation comme tu me l'expliques au début du post.

Comment puis-je accéder a ce paramétrage ? car j'ai cherché via my project => publier mais je ne trouve pas de relation avec le paramétrage

Bonjour,

Ci-dessous 2 fonctions qui permettent d'authentifier l'ordinateur et donc empêcher le contournement par une désinstallation/réinstallation.

Revers de la médaille (on n'a rien sans rien) : si l'utilisateur a acquis la full-license, il la perdra lorsqu'il changera d'ordinateur. Il faut donc bien dire dans le CLUF que la licence est valable pour un seul ordinateur et perd sa validité en cas de changement de celui-ci :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
  Public Function GetMacAddress() As String
 
        Dim Result As String = ""
        If (System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces().Count() > 0) Then
            Result = BitConverter.ToString(System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces()(0).GetPhysicalAddress().GetAddressBytes())
        End If
 
        Return Result
 
    End Function
 
    Public Function GetProcessorRef() As String
 
        Dim ProcClass As New System.Management.ManagementClass("Win32_Processor")
        Dim Procs As ManagementObjectCollection = ProcClass.GetInstances
        Dim Proc As ManagementObject
        For Each Proc In Procs
            GetProcessorRef = Proc("ProcessorId").ToString
            Exit For
        Next Proc
 
    End Function

Citation:
Envoyé par noftal
Bonjour,

Ci-dessous 2 fonctions qui permettent d'authentifier l'ordinateur et donc empêcher le contournement par une désinstallation/réinstallation.

Revers de la médaille (on n'a rien sans rien) : si l'utilisateur a acquis la full-license, il la perdra lorsqu'il changera d'ordinateur. Il faut donc bien dire dans le CLUF que la licence est valable pour un seul ordinateur et perd sa validité en cas de changement de celui-ci :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 Public Function GetMacAddress() As String Dim Result As String = "" If (System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces().Count() > 0) Then Result = BitConverter.ToString(System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces()(0).GetPhysicalAddress().GetAddressBytes()) End If Return Result End Function Public Function GetProcessorRef() As String Dim ProcClass As New System.Management.ManagementClass("Win32_Processor") Dim Procs As ManagementObjectCollection = ProcClass.GetInstances Dim Proc As ManagementObject For Each Proc In Procs GetProcessorRef = Proc("ProcessorId").ToString Exit For Next Proc End Function
Bonjour noftal,

Merci pour ta réponse.

Je vais étudier ta solution et voir si le compromis Licence est viable pour mon application.

Merci à toi :D