formulaire login/password difficile a réaliser [Résolu]

[Happock]

Bonjour,

voila quelques jours que je cherche et je ne trouve pas un code qui fonctionne pour un formulaire login/password... je repose la question mais personne n'a réelement laissé un code qui fonctionne.... svp aidez moi aprés cette fonction j'aurrai fini ma bdd...

Merci a tous

Happock

[marot_r]

Si tu veux un formulaire léger cela n'a rien de compliquer.

Tu crées un form avec 2 zone de texte (Utilisateur, MotPasse) et un bouton 'Connecter'

Sur le clic du bouton connecté

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
dim MotPasse as string 
MotPasse=DFirst("[MotPasse]","TableSecurite","[Utilisateur]=""" & me.Utilisateur & """")
if not isnull(MotPasse) then
  if Motpasse=Me.MotPasse then
    msgbox "Bravo !"
    'Appeler ici le form principal de l'appli
    docmd.close acform, me.name
  else
    msgbox "Mot de passe ou code d'utilisateur invalide"
  end if
else
  msgbox "Mot de passe ou code d'utilisateur invalide"
end if

Attention ce code est ULTRA LIGHT !

Il présente les défaut suivants :

1) Le mot de passe est en clair dans la base
2) N'importe qui peut bypasser le form de controle en démarant le BD avec Shift.

Mais comme toute sécurité il faut évaluer le cout de la protection vis à vis du cout des données protégées.

Si cela est trop léger il y a des sécurités intégrées à access (qui sont une vraie galère) et d'autre méthodes. Vois la FAQ sur la sécurité dans Access.

A+

[Happock]

Merci pour ce ptit coup de pousse... je vais voir ce que je peut en tirer et surtout le protéger aprés bon fonctionnement...

[Happock]

J'ai réussis a réaliser mon formulaire, merci bcp

Happock