Bonjour
est il possible de mettre un mot de passe sur un formulaire
(pas sur la base )
si oui qq1 peut il me dire comment faire (ou) ou trouver l'info ?
Merci par avance
A
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
Damien
Salut, sur le bouton qui appelera ton formulaire dim strinput as string If strinput <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
cependant tu peux aussi créer un formulaire mot de passe avec une zone de texte auquelle tu affectes le masque de saisie mot de passe et un bouton ok sur le lequel tu mets le code. if me.tazonetexte.value <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
A + Damien.
-----Message d'origine----- Bonjour est il possible de mettre un mot de passe sur un formulaire
(pas sur la base ) si oui qq1 peut il me dire comment faire (ou) ou trouver l'info ?
Merci par avance A
PS peut être en double le post
.
Salut,
sur le bouton qui appelera ton formulaire
dim strinput as string
If strinput <>"ton mot de passe" then
msgbox "Mot de passe incorrect"
else
docmd.openform "Ton Form"
end if
cependant tu peux aussi créer un formulaire mot de passe
avec une zone de texte auquelle tu affectes le masque de
saisie mot de passe et un bouton ok sur le lequel tu mets
le code.
if me.tazonetexte.value <>"ton mot de passe" then
msgbox "Mot de passe incorrect"
else
docmd.openform "Ton Form"
end if
A +
Damien.
-----Message d'origine-----
Bonjour
est il possible de mettre un mot de passe sur un
formulaire
(pas sur la base )
si oui qq1 peut il me dire comment faire (ou) ou trouver
l'info ?
Salut, sur le bouton qui appelera ton formulaire dim strinput as string If strinput <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
cependant tu peux aussi créer un formulaire mot de passe avec une zone de texte auquelle tu affectes le masque de saisie mot de passe et un bouton ok sur le lequel tu mets le code. if me.tazonetexte.value <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
A + Damien.
-----Message d'origine----- Bonjour est il possible de mettre un mot de passe sur un formulaire
(pas sur la base ) si oui qq1 peut il me dire comment faire (ou) ou trouver l'info ?
Merci par avance A
PS peut être en double le post
.
Albert
Damien wrote:
Ok Merci pour les infos je met tous cela en application A.
Damien <nospam@nospam.com> wrote:
Ok Merci pour les infos
je met tous cela en application
A.
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
"Damien" a écrit dans le message de news:1161c01c383ae$b388a1d0$ Salut, sur le bouton qui appelera ton formulaire dim strinput as string If strinput <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
cependant tu peux aussi créer un formulaire mot de passe avec une zone de texte auquelle tu affectes le masque de saisie mot de passe et un bouton ok sur le lequel tu mets le code. if me.tazonetexte.value <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
A + Damien.
-----Message d'origine----- Bonjour est il possible de mettre un mot de passe sur un formulaire
(pas sur la base ) si oui qq1 peut il me dire comment faire (ou) ou trouver l'info ?
Merci par avance A
PS peut être en double le post
.
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le
mauvais) mot de passe
mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il
ouvre le formulaire lorsque tu cliques sur
le bouton....
"Damien" <nospam@nospam.com> a écrit dans le message de
news:1161c01c383ae$b388a1d0$a601280a@phx.gbl...
Salut,
sur le bouton qui appelera ton formulaire
dim strinput as string
If strinput <>"ton mot de passe" then
msgbox "Mot de passe incorrect"
else
docmd.openform "Ton Form"
end if
cependant tu peux aussi créer un formulaire mot de passe
avec une zone de texte auquelle tu affectes le masque de
saisie mot de passe et un bouton ok sur le lequel tu mets
le code.
if me.tazonetexte.value <>"ton mot de passe" then
msgbox "Mot de passe incorrect"
else
docmd.openform "Ton Form"
end if
A +
Damien.
-----Message d'origine-----
Bonjour
est il possible de mettre un mot de passe sur un
formulaire
(pas sur la base )
si oui qq1 peut il me dire comment faire (ou) ou trouver
l'info ?
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
"Damien" a écrit dans le message de news:1161c01c383ae$b388a1d0$ Salut, sur le bouton qui appelera ton formulaire dim strinput as string If strinput <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
cependant tu peux aussi créer un formulaire mot de passe avec une zone de texte auquelle tu affectes le masque de saisie mot de passe et un bouton ok sur le lequel tu mets le code. if me.tazonetexte.value <>"ton mot de passe" then msgbox "Mot de passe incorrect" else docmd.openform "Ton Form" end if
A + Damien.
-----Message d'origine----- Bonjour est il possible de mettre un mot de passe sur un formulaire
(pas sur la base ) si oui qq1 peut il me dire comment faire (ou) ou trouver l'info ?
Merci par avance A
PS peut être en double le post
.
Albert
PO2B wrote:
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
J'ai contourné en incluant dans le champ texte une valeur
par défaut (autre que le mot de passe) A.
PO2B <nospam_po2b@ifrance.com> wrote:
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon
(ou le mauvais) mot de passe
mais si tu ne saisis pas du tout de mot de passe dans le champ texte,
il ouvre le formulaire lorsque tu cliques sur
le bouton....
J'ai contourné en incluant dans le champ texte une valeur
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
J'ai contourné en incluant dans le champ texte une valeur
par défaut (autre que le mot de passe) A.
Damien Mermoz
Bonjour,
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert ou bien rajouter un test de plus dans ton code If not isnull(Me.tazt) and Me.tazt <>"" then If Me.tazt <> mdp then msgbox "mdp incorrect" else docmd.openform end if else msgbox "veuillez insérer votre mdp" end if
A + "PO2B" a écrit dans le message news:
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
Bonjour,
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert ou
bien rajouter un test de plus dans ton code
If not isnull(Me.tazt) and Me.tazt <>"" then
If Me.tazt <> mdp then
msgbox "mdp incorrect"
else
docmd.openform
end if
else
msgbox "veuillez insérer votre mdp"
end if
A +
"PO2B" <nospam_po2b@ifrance.com> a écrit dans le message news:
eKFAYCEhDHA.3324@TK2MSFTNGP11.phx.gbl...
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le
mauvais) mot de passe
mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il
ouvre le formulaire lorsque tu cliques sur
le bouton....
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert ou bien rajouter un test de plus dans ton code If not isnull(Me.tazt) and Me.tazt <>"" then If Me.tazt <> mdp then msgbox "mdp incorrect" else docmd.openform end if else msgbox "veuillez insérer votre mdp" end if
A + "PO2B" a écrit dans le message news:
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
Albert
Damien Mermoz wrote:
Bonjour,
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert
Ma solution n'etait pas entièrement viable car si le champ par défaut était effacé et remplacé par rien (chaîne vide) on était à nouveau dans le même cas j'avais donc écrit
If Not Me.Passe.Value = "" Then If Me.Passe.Value <> "mot-de-passe" Then ....
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme
Albert
Ma solution n'etait pas entièrement viable
car si le champ par défaut était effacé et remplacé par
rien (chaîne vide) on était à nouveau dans le même cas
j'avais donc écrit
If Not Me.Passe.Value = "" Then
If Me.Passe.Value <> "mot-de-passe" Then
....
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert
Ma solution n'etait pas entièrement viable car si le champ par défaut était effacé et remplacé par rien (chaîne vide) on était à nouveau dans le même cas j'avais donc écrit
If Not Me.Passe.Value = "" Then If Me.Passe.Value <> "mot-de-passe" Then ....
End If End If .....
A.
PO2B
Merci, ça fonctionne, c'est vraiment simple et pratique bravo,
je te sollicite encore un peu si tu le permets,
J'utilise ce code en remplaçant le mot de passe par le champs « PassWord d' une table du même nom qui permet d'affecter des mots de passe différents pour plusieurs utilisateurs,
Existe-t-il un moyen de sécuriser cette table (la cacher ou la verrouiller ?)
Merci d'avance
"Damien Mermoz" a écrit dans le message de news:
Bonjour,
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert ou
bien rajouter un test de plus dans ton code If not isnull(Me.tazt) and Me.tazt <>"" then If Me.tazt <> mdp then msgbox "mdp incorrect" else docmd.openform end if else msgbox "veuillez insérer votre mdp" end if
A + "PO2B" a écrit dans le message news:
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le
mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
Merci, ça fonctionne, c'est vraiment simple et pratique bravo,
je te sollicite encore un peu si tu le permets,
J'utilise ce code en remplaçant le mot de passe par le champs « PassWord d'
une table du même nom qui permet d'affecter des mots de passe différents
pour plusieurs utilisateurs,
Existe-t-il un moyen de sécuriser cette table (la cacher ou la verrouiller
?)
Merci d'avance
"Damien Mermoz" <np_damien.mermoz@libertysurf.fr> a écrit dans le message de
news:OoGKs9NhDHA.2224@TK2MSFTNGP10.phx.gbl...
Bonjour,
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert
ou
bien rajouter un test de plus dans ton code
If not isnull(Me.tazt) and Me.tazt <>"" then
If Me.tazt <> mdp then
msgbox "mdp incorrect"
else
docmd.openform
end if
else
msgbox "veuillez insérer votre mdp"
end if
A +
"PO2B" <nospam_po2b@ifrance.com> a écrit dans le message news:
eKFAYCEhDHA.3324@TK2MSFTNGP11.phx.gbl...
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou
le
mauvais) mot de passe
mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il
ouvre le formulaire lorsque tu cliques sur
le bouton....
Merci, ça fonctionne, c'est vraiment simple et pratique bravo,
je te sollicite encore un peu si tu le permets,
J'utilise ce code en remplaçant le mot de passe par le champs « PassWord d' une table du même nom qui permet d'affecter des mots de passe différents pour plusieurs utilisateurs,
Existe-t-il un moyen de sécuriser cette table (la cacher ou la verrouiller ?)
Merci d'avance
"Damien Mermoz" a écrit dans le message de news:
Bonjour,
Oui bien vu c'est un oubli de ma part désolé, tu peux faire comme Albert ou
bien rajouter un test de plus dans ton code If not isnull(Me.tazt) and Me.tazt <>"" then If Me.tazt <> mdp then msgbox "mdp incorrect" else docmd.openform end if else msgbox "veuillez insérer votre mdp" end if
A + "PO2B" a écrit dans le message news:
Bonjour Damien,
J'ai essayé ton code, il réagit parfaitement quand tu saisis le bon (ou le
mauvais) mot de passe mais si tu ne saisis pas du tout de mot de passe dans le champ texte, il ouvre le formulaire lorsque tu cliques sur le bouton....
