J'ai une table employ=E9 avec comme champs Nom, pr=E9nom,=20
service, login et mot de passe.
J'ai r=E9aliser un formulaire ind=E9pendant ou l'utilisateur=20
viens rentrer son login et son mot de passe
1 Comment faire en sorte pour que sur l'entr=E9e du login=20
je puisse v=E9rifier que le login existe et si oui comment=20
aller chercher le mot de passe pour le controler par=20
rapport =E0 celui saisi
2 Comment permettre de bloquer ou de d=E9bloquer certain=20
menu du menu g=E9n=E9ral en fonction du service d'appartenance
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
tu controles tout à la fois. En perte de focus du mot de passe, tu lances un DLookup sur le champ mot de passe de la table utilisateurs avec une clause where sur l'utilisateur: if Me.MotdePasse <> DLookup("Champmotdepasse", "TableUtilisateurs", "[Utilisateur] = '" & Me.Utilisateur & "'") Then ' ici c'est pas bon end if
pour bloquer ou débloquer certains éléments du menu, il faut que chaque utilisateur ait un code permissions dans la table et à l'ouverture du formulaire tu places les contrôles visibles ou non selon la valeur du champ permission. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" a écrit dans le message de news: 12be01c4b5dd$63c744a0$ Bonjour
J'ai une table employé avec comme champs Nom, prénom, service, login et mot de passe. J'ai réaliser un formulaire indépendant ou l'utilisateur viens rentrer son login et son mot de passe 1 Comment faire en sorte pour que sur l'entrée du login je puisse vérifier que le login existe et si oui comment aller chercher le mot de passe pour le controler par rapport à celui saisi 2 Comment permettre de bloquer ou de débloquer certain menu du menu général en fonction du service d'appartenance
Merci de votre aide car je coince un peu
Bonjour.
tu controles tout à la fois. En perte de focus du mot de passe, tu lances un
DLookup sur le champ mot de passe de la table utilisateurs avec une clause
where sur l'utilisateur:
if Me.MotdePasse <> DLookup("Champmotdepasse", "TableUtilisateurs",
"[Utilisateur] = '" & Me.Utilisateur & "'") Then
' ici c'est pas bon
end if
pour bloquer ou débloquer certains éléments du menu, il faut que chaque
utilisateur ait un code permissions dans la table et à l'ouverture du
formulaire tu places les contrôles visibles ou non selon la valeur du champ
permission.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 12be01c4b5dd$63c744a0$a501280a@phx.gbl...
Bonjour
J'ai une table employé avec comme champs Nom, prénom,
service, login et mot de passe.
J'ai réaliser un formulaire indépendant ou l'utilisateur
viens rentrer son login et son mot de passe
1 Comment faire en sorte pour que sur l'entrée du login
je puisse vérifier que le login existe et si oui comment
aller chercher le mot de passe pour le controler par
rapport à celui saisi
2 Comment permettre de bloquer ou de débloquer certain
menu du menu général en fonction du service d'appartenance
tu controles tout à la fois. En perte de focus du mot de passe, tu lances un DLookup sur le champ mot de passe de la table utilisateurs avec une clause where sur l'utilisateur: if Me.MotdePasse <> DLookup("Champmotdepasse", "TableUtilisateurs", "[Utilisateur] = '" & Me.Utilisateur & "'") Then ' ici c'est pas bon end if
pour bloquer ou débloquer certains éléments du menu, il faut que chaque utilisateur ait un code permissions dans la table et à l'ouverture du formulaire tu places les contrôles visibles ou non selon la valeur du champ permission. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" a écrit dans le message de news: 12be01c4b5dd$63c744a0$ Bonjour
J'ai une table employé avec comme champs Nom, prénom, service, login et mot de passe. J'ai réaliser un formulaire indépendant ou l'utilisateur viens rentrer son login et son mot de passe 1 Comment faire en sorte pour que sur l'entrée du login je puisse vérifier que le login existe et si oui comment aller chercher le mot de passe pour le controler par rapport à celui saisi 2 Comment permettre de bloquer ou de débloquer certain menu du menu général en fonction du service d'appartenance
Merci de votre aide car je coince un peu
didi
Bonsoir
Je viens de tester, cela fonctionne sur le mot de passe , j'ai placé un message d'erreur. Par contre comment tester le login car si le login est erroné rien ne se passe, je veut juste affiché "Login erroné" Pour les permissions, elles dépend du service de l'utilisateur, ce service est noté dans la table utilisateur
-----Message d'origine----- Bonjour.
tu controles tout à la fois. En perte de focus du mot de passe, tu lances un
DLookup sur le champ mot de passe de la table utilisateurs avec une clause
where sur l'utilisateur: if Me.MotdePasse <> DLookup ("Champmotdepasse", "TableUtilisateurs",
"[Utilisateur] = '" & Me.Utilisateur & "'") Then ' ici c'est pas bon end if
pour bloquer ou débloquer certains éléments du menu, il faut que chaque
utilisateur ait un code permissions dans la table et à l'ouverture du
formulaire tu places les contrôles visibles ou non selon la valeur du champ
permission. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" a écrit dans le message de
news: 12be01c4b5dd$63c744a0$ Bonjour
J'ai une table employé avec comme champs Nom, prénom, service, login et mot de passe. J'ai réaliser un formulaire indépendant ou l'utilisateur viens rentrer son login et son mot de passe 1 Comment faire en sorte pour que sur l'entrée du login je puisse vérifier que le login existe et si oui comment aller chercher le mot de passe pour le controler par rapport à celui saisi 2 Comment permettre de bloquer ou de débloquer certain menu du menu général en fonction du service d'appartenance
Merci de votre aide car je coince un peu
.
Bonsoir
Je viens de tester, cela fonctionne sur le mot de passe ,
j'ai placé un message d'erreur.
Par contre comment tester le login car si le login est
erroné rien ne se passe, je veut juste affiché "Login
erroné"
Pour les permissions, elles dépend du service de
l'utilisateur, ce service est noté dans la table
utilisateur
-----Message d'origine-----
Bonjour.
tu controles tout à la fois. En perte de focus du mot de
passe, tu lances un
DLookup sur le champ mot de passe de la table
utilisateurs avec une clause
where sur l'utilisateur:
if Me.MotdePasse <> DLookup
("Champmotdepasse", "TableUtilisateurs",
"[Utilisateur] = '" & Me.Utilisateur & "'") Then
' ici c'est pas bon
end if
pour bloquer ou débloquer certains éléments du menu, il
faut que chaque
utilisateur ait un code permissions dans la table et à
l'ouverture du
formulaire tu places les contrôles visibles ou non selon
la valeur du champ
permission.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" <anonymous@discussions.microsoft.com> a écrit
dans le message de
J'ai une table employé avec comme champs Nom, prénom,
service, login et mot de passe.
J'ai réaliser un formulaire indépendant ou l'utilisateur
viens rentrer son login et son mot de passe
1 Comment faire en sorte pour que sur l'entrée du login
je puisse vérifier que le login existe et si oui comment
aller chercher le mot de passe pour le controler par
rapport à celui saisi
2 Comment permettre de bloquer ou de débloquer certain
menu du menu général en fonction du service
d'appartenance
Je viens de tester, cela fonctionne sur le mot de passe , j'ai placé un message d'erreur. Par contre comment tester le login car si le login est erroné rien ne se passe, je veut juste affiché "Login erroné" Pour les permissions, elles dépend du service de l'utilisateur, ce service est noté dans la table utilisateur
-----Message d'origine----- Bonjour.
tu controles tout à la fois. En perte de focus du mot de passe, tu lances un
DLookup sur le champ mot de passe de la table utilisateurs avec une clause
where sur l'utilisateur: if Me.MotdePasse <> DLookup ("Champmotdepasse", "TableUtilisateurs",
"[Utilisateur] = '" & Me.Utilisateur & "'") Then ' ici c'est pas bon end if
pour bloquer ou débloquer certains éléments du menu, il faut que chaque
utilisateur ait un code permissions dans la table et à l'ouverture du
formulaire tu places les contrôles visibles ou non selon la valeur du champ
permission. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" a écrit dans le message de
news: 12be01c4b5dd$63c744a0$ Bonjour
J'ai une table employé avec comme champs Nom, prénom, service, login et mot de passe. J'ai réaliser un formulaire indépendant ou l'utilisateur viens rentrer son login et son mot de passe 1 Comment faire en sorte pour que sur l'entrée du login je puisse vérifier que le login existe et si oui comment aller chercher le mot de passe pour le controler par rapport à celui saisi 2 Comment permettre de bloquer ou de débloquer certain menu du menu général en fonction du service d'appartenance
Merci de votre aide car je coince un peu
.
Raymond [mvp]
Bonjour.
si la valeur renvoyée est nulle, le login n'existe pas. il suffit de tester le retour. le test étant double place le retour dans une variable pour conserver le résultat. Dim PWD as variant PWD = DLookup("Champmotdepasse", "TableUtilisateurs", "[Utilisateur] = '" & Me.Utilisateur & "'") if isnull(PWD) then 'ici login pas bon endif if Me.MotdePasse <> PWD Then ' ici mot de passe pas bon end if
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" a écrit dans le message de news: 014a01c4b61a$ff233980$ Bonsoir
Je viens de tester, cela fonctionne sur le mot de passe , j'ai placé un message d'erreur. Par contre comment tester le login car si le login est erroné rien ne se passe, je veut juste affiché "Login erroné" Pour les permissions, elles dépend du service de l'utilisateur, ce service est noté dans la table utilisateur
Bonjour.
si la valeur renvoyée est nulle, le login n'existe pas. il suffit de tester
le retour.
le test étant double place le retour dans une variable pour conserver le
résultat.
Dim PWD as variant
PWD = DLookup("Champmotdepasse", "TableUtilisateurs", "[Utilisateur] = '" &
Me.Utilisateur & "'")
if isnull(PWD) then
'ici login pas bon
endif
if Me.MotdePasse <> PWD Then
' ici mot de passe pas bon
end if
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 014a01c4b61a$ff233980$a401280a@phx.gbl...
Bonsoir
Je viens de tester, cela fonctionne sur le mot de passe ,
j'ai placé un message d'erreur.
Par contre comment tester le login car si le login est
erroné rien ne se passe, je veut juste affiché "Login
erroné"
Pour les permissions, elles dépend du service de
l'utilisateur, ce service est noté dans la table
utilisateur
si la valeur renvoyée est nulle, le login n'existe pas. il suffit de tester le retour. le test étant double place le retour dans une variable pour conserver le résultat. Dim PWD as variant PWD = DLookup("Champmotdepasse", "TableUtilisateurs", "[Utilisateur] = '" & Me.Utilisateur & "'") if isnull(PWD) then 'ici login pas bon endif if Me.MotdePasse <> PWD Then ' ici mot de passe pas bon end if
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"didi" a écrit dans le message de news: 014a01c4b61a$ff233980$ Bonsoir
Je viens de tester, cela fonctionne sur le mot de passe , j'ai placé un message d'erreur. Par contre comment tester le login car si le login est erroné rien ne se passe, je veut juste affiché "Login erroné" Pour les permissions, elles dépend du service de l'utilisateur, ce service est noté dans la table utilisateur
