OVH Cloud OVH Cloud

Do Until response etc ....

2 réponses
Avatar
asta
Bonjour,
dans une de mes bases à l'ouverture j'oblige les utilisateurs par une
question à entrer un mot de passe voir ci-dessous le process ;
Private Sub Form_Resize()
Dim response As String
Do Until response = "blabla" Or response = "stop"
response = InputBox("veuillez saisir votre mot de passe SVP, ou
taper stop pour arrêter")
If response = "blabla" Then
DoCmd.OpenForm "frmMenuChoix"
DoCmd.Close acForm, "for_utilisateurs_agrees"
Else
If response = "stop" Then
DoCmd.Close acForm, "for_utilisateurs_agrees"
Quit
End If
End If
Loop
Close
End Sub
donc mon petit je dirais "formulaire" s'ouvre avec la questions et
l'utilisateur doit entrer son mot de passe, mais là je voudrais des
"xxxxxxxxxx" lors de l'entrée du mot de passe, comme c'est un formulaire qui
se créé automatiquement à l'ouverture de la base je ne peux pas intervenir
dans les propriétés et lui dire que je désires un format mot de passe, je
suppose que c'est dans mon instruction ci-dessus que je dois lui dire ????
mais comment l'écrire ....
Par avance merci si vous avez une réponse toute simple que je pourrais
rajouter dans mon instruction
ASTA

2 réponses

Avatar
Raymond [mvp]
Bonjour.

tu ne peux pas le faire dans la fonction inputbox.
il faut que tu passes par un formulaire avec un contrôle texte et tu
mettras le masque de saisie à "mot de passe".

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"asta" a écrit dans le message de news:

Bonjour,
dans une de mes bases à l'ouverture j'oblige les utilisateurs par une
question à entrer un mot de passe voir ci-dessous le process ;
Private Sub Form_Resize()
Dim response As String
Do Until response = "blabla" Or response = "stop"
response = InputBox("veuillez saisir votre mot de passe SVP, ou
taper stop pour arrêter")
If response = "blabla" Then
DoCmd.OpenForm "frmMenuChoix"
DoCmd.Close acForm, "for_utilisateurs_agrees"
Else
If response = "stop" Then
DoCmd.Close acForm, "for_utilisateurs_agrees"
Quit
End If
End If
Loop
Close
End Sub
donc mon petit je dirais "formulaire" s'ouvre avec la questions et
l'utilisateur doit entrer son mot de passe, mais là je voudrais des
"xxxxxxxxxx" lors de l'entrée du mot de passe, comme c'est un formulaire
qui
se créé automatiquement à l'ouverture de la base je ne peux pas intervenir
dans les propriétés et lui dire que je désires un format mot de passe, je
suppose que c'est dans mon instruction ci-dessus que je dois lui dire ????
mais comment l'écrire ....
Par avance merci si vous avez une réponse toute simple que je pourrais
rajouter dans mon instruction
ASTA


Avatar
asta
Bonjour Raymond,
merci, c'est bien dommage mais bon je vais le faire comme tu dis
A bientôt
asta

"Raymond [mvp]" wrote:

Bonjour.

tu ne peux pas le faire dans la fonction inputbox.
il faut que tu passes par un formulaire avec un contrôle texte et tu
mettras le masque de saisie à "mot de passe".

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"asta" a écrit dans le message de news:

Bonjour,
dans une de mes bases à l'ouverture j'oblige les utilisateurs par une
question à entrer un mot de passe voir ci-dessous le process ;
Private Sub Form_Resize()
Dim response As String
Do Until response = "blabla" Or response = "stop"
response = InputBox("veuillez saisir votre mot de passe SVP, ou
taper stop pour arrêter")
If response = "blabla" Then
DoCmd.OpenForm "frmMenuChoix"
DoCmd.Close acForm, "for_utilisateurs_agrees"
Else
If response = "stop" Then
DoCmd.Close acForm, "for_utilisateurs_agrees"
Quit
End If
End If
Loop
Close
End Sub
donc mon petit je dirais "formulaire" s'ouvre avec la questions et
l'utilisateur doit entrer son mot de passe, mais là je voudrais des
"xxxxxxxxxx" lors de l'entrée du mot de passe, comme c'est un formulaire
qui
se créé automatiquement à l'ouverture de la base je ne peux pas intervenir
dans les propriétés et lui dire que je désires un format mot de passe, je
suppose que c'est dans mon instruction ci-dessus que je dois lui dire ????
mais comment l'écrire ....
Par avance merci si vous avez une réponse toute simple que je pourrais
rajouter dans mon instruction
ASTA