Vérifier l'identité de l'ordinateur à l'ouverture du fichierRésolu

Question

Bonjour,

J'ai créé pour certains de mes clients un fichier excel et j'aimerais m'assurer qu'il ne pourra pas circuler sans mon autorisation. Je ne suis pas convaincu de pouvoir éviter ce risque en utilisant un système de mot de passe.
Est-il possible de vérifier l'identité de l'ordinateur par l'intermédiaire d'un code VBA dès l'ouverture du fichier ? De cette façon, j'installe moi-même le fichier sur l'ordi de mon client, et je suis sûr qu'il ne sera pas utilisable sur un autre poste.

Un grand merci d'avance pour votre aide.

ucfoutu · Answer

Bonjour,
1) Je commence donc par déplacer ta discussion, ouverte dans le forum général de Visual Basic, vers le sous-forum correspondant à ton langage de développement (à savoir VBA).
2) qu'appelles-tu (exactement) "identité de l'ordinateur" ?
(sois très précis sur ce point). Un PC n'a rien de cela. Il est doté :
- d'un disque dur qui a un nom,  un numéro attribué... Il a également un numéro de série matériel. 
- d'une carte mère
- de périphériques
Et tu veux appuyer ta protection sur quoi ? (d'invariable, de préférence) ?
Je te rappelle que tu ne "vends" pas une appli à un PC, mais à un acheteur, lequel est susceptible de changer un jour de disque dur, voire carrément de machine.
Ta démarche ne serait donc à peu près légale qu'assortie d'un engagement à assurer la "mutation" en cas de changement (lourd et nécessitant la mise en place d'un service après vente et un "pignon sur rue".
 

EDIT : j'ajoute que toute "protection" de l'espèce serait "craquée" en moins de deux temps (sauf par un innocent de chez innocent) , s'agissant d'une appli s'appuyant  sur Microsoft Office.
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend

ucfoutu · Answer

Ce n'est pas que la protection ne sera pas "hyper fiable", mais qu'elle n'est, avec VBA/Office, pas du tout fiable.
Tu dis plus haut que tu n'as pas confiance en le mot de passe de VBA (et tu as bien raison).
Mais alors : comment comptes-tu donc protéger l'accès à la macro
qui, à l'ouverture, vérifierait que ton appli tourne bien sur tel PC ? 
- si le "voleur" d'appli ne sait pas "casser" la protection par mot de passe, nul besoin d'autre protection. 
- si, au contraire il sait (et c'est facile) "casser" la protection par mot de passe, il accèdera à ta macro de "protection complémentaire" et la shuntera purement et simplement en deux temps trois mouvements.
Ne perds donc pas de temps pour rien.

EDIT et de manière générale : 
Nul ne penserait à "voler" une appli si celle-ci ne sort pas vraiment du commun. Il est toujours assez facile de la refaire (quelquefois mieux), dès que l'on en connait les fonctionnalités (et celles-ci sont par essence visibles). C'est donc l'idée elle-même et non le code, qui sera "volé". 
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend

cs_Le Pivert · Answer

Bonjour à vous 2, 

Je suis tout à fait d'accord avec ucfoutu. Avec Open Office tu peux avoir accès au code. Mais si tu as comme tu le dis des clients novices en programmation ils n'iront pas chercher par là. Donc voici une solution, avec le registre. Tu crées une clé spécifique qui ne sera que sur la machine de ton client. Tu l'appelles, si elle existe ton classeur s'ouvre, sinon nada. Ensuite tu protèges tes macros. Pas besoin de mot de passe!

MAGICIENMATT · Answer

je confirme ucfoutu le système office n'est pas fiable pour des bidouilleur ou programmeur averti l'accès au macro est assez simple il suffi juste de naviguer sur internet pour trouver la solution.
Et donc ton bout de code qui vérifie le numéro de série servira donc a rien

cs_Le Pivert · Answer

Je vais te donner le processus qui est très simple. ucfoutu, magienmatt et moi même nous t'avons averti que Excel est une passoire, mais cela peut faire illusion pour un néophyte. 

tu ouvres un classeur pour créer ta clé et j'ai mis aussi la suppression de la clé pour tes essais.
code a mettre dans ThisWorkbook:

Option Explicit
Private Sub ecriture()
SaveSetting appname:="Monappli", Section:="Autorise", _
            Key:="Valeur", setting:="True"
End Sub
Private Sub Workbook_Open()
'supprimer' a activer pour tes essais
ecriture ' a désactiver pour tes essais
End Sub
'supprimer valeur
Private Sub supprimer()
On Error Resume Next 'si pas de clé
DeleteSetting "Monappli"
End Sub


Tu fermes ton classeur et tu l'ouvre de nouveau, ta clé est créée

A mettre ce code dans ton classeur Excel client dans ThisWorkbook:

Option Explicit
Dim mot As String
Private Sub lecture()
mot = GetSetting(appname:="Monappli", Section:="Autorise", _
                       Key:="Valeur")
 If mot = "" Then
ActiveWorkbook.Close
End If
 End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
 'remettre l'affichage d'un classeur s'il est ouvert alors que l'exécution
'des macros est désactivée dans les options de sécurité
ThisWorkbook.IsAddin = True
End Sub
Private Sub Workbook_Open()
 'empêcher l'affichage d'un classeur s'il est ouvert alors que l'exécution
'des macros est désactivée dans les options de sécurité
ThisWorkbook.IsAddin = False
lecture
End Sub

Vérifier l'identité de l'ordinateur à l'ouverture du fichier

5 réponses

Votre réponse

Discussions similaires