Discussion :

[Xof68]

Bonjour,

j'aimerai ouvrir un formulaire au moyen d'un mot de passe (fenêtre de dialogue)
Ce mot de passe est stocké dans le champ d'une table (Table : MDP - champ : Mot de passe) et peut donc être modifié facilement.

Merci pour vos réponses

Christophe

[ffdream62]

Si tu n'as pas besoin de quelque chose de costaud niveau sécurité, tu peux toujours créer un petit formulaire "mot de passe" qui va vérifier le MDP stocké dans ta table.

[Invité]

Bonjour

As-tu consulté la FAQ Access ? : http://access.developpez.com/faq/?page=TAAdmin#login

Philippe

[marsouin_89]

Bonjour,

Voici comment je fais :

Dans un module, tu copie le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Option Compare Binary 'Binary pour comparaison de texte en binaire
 
Function CompareTxt(Mot1 As String, Mot2 As String) As Integer
    If Mot1 = Mot2 Then 'Si mot identique (casse  comprise)
        CompareTxt = 1
    Else
        CompareTxt = 0
    End If
End Function

Dans ton formulaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim PassWord As String
PassWord = DFirst("MotPasse", "Tbl_PassWord")
 
If CompareTxt(Me.MotDePasse, PassWord) = 1 Then
   DoCmd.OpenForm("NomDeTonFormulaire")
Else
  MsgBox "Mot de passe incorrect ! ! !"
End If

A toi de voir la suite pour, éventuellement, envisager le changement du mot de passe.

Cordialement

Christophe

[Dolphy35]

Salut,

si tu veux sécuriser, tu peux passer par une fonction de cryptage de tes données, cela sécurise un peu plus mais Access n'est pas le must en terme de protection de données. A savoir que tout ce qui se construit, se détruit.

http://mhubiche.developpez.com/Acces...tage/vigenere/

@++

[ffdream62]

Tu peux utiliser l'InputBox aussi