affichage dynamique de champs dans un formulaire

affichage dynamique de champs dans un formulaire - VB/VBA/VBS - Programmation

Marsh Posté le 28-04-2005 à 17:10:04    

bonjour,j'aimerai lorsque j'accède à un formulaire (après une authentification dans un autre formulaire) que dans ce formulaire qui s'ouvre j'ai un message du type : bienvenu jean dupont, avec le nom et le prénom de la personne qui s'est connecté. quelqu'un aurait il une idée ?
 

Reply

Marsh Posté le 28-04-2005 à 17:10:04   

Reply

Marsh Posté le 28-04-2005 à 17:16:18    

Le mieux est de déclarer des variables publiques dans ton deuxième formulaire et de les instancier à partir du premier... Je sais pas si je suis tres claire mais bon c'est le principe :$

Reply

Marsh Posté le 28-04-2005 à 17:30:03    

ok, je vois à peu près ce que tu veux dire. j'essaye et je te tient au courant.
 
merci

Reply

Marsh Posté le 28-04-2005 à 17:43:16    

bon, mon idée était mauvaise, je n'ai pas du comprendre ce que tu voulais dire. en fait, voila ce qui me gêne :
 
dans quel objet d'un formulaire mettre ce nom et ce prénom ?
dans une zone de texte ?  
la je suis perdu

Reply

Marsh Posté le 28-04-2005 à 18:03:20    

je reformule : ou stocker ce nom et ce prénom dans le formulaire qui va s'ouvrir après la connexion ?

Reply

Marsh Posté le 28-04-2005 à 18:52:25    

Il suffit que tu fasse un module a part avec des variables du style :
Public Nom_personne as string
 
et dans ton premier formulaire:
je fais ici l'hypothèse que tu as placé l'identification dan un champ de texte chp_nom_pers
 
Nom_personne = chp_nom_pers.text
 
tu n'as plus enfin qu'a faire  
msgbox Nom_personne dans le formulaire qui s'ouvre

Reply

Marsh Posté le 28-04-2005 à 19:09:14    

ok, mais il ya deux problèmes : d'une part, je ne veux pas l'afficher dans une MsgBox, d'autre part, dans mon premier formulaire, je rentre un login et un password pour l'utilisateur, et pas son nom ni son prénom. je te marque mon code, peut être que tu comprendra mieux ce que je veux :
 
Private Sub cmdValiderAuthentification_Click()
Me.Requery
Dim sql As String
Dim rs As DAO.Recordset
Static i As Byte
sql = " SELECT * FROM Utilisateur WHERE loginU = '" & Me.txtLoginU & "' and passwordU = '" & Me.txtPasswordU & "';"
Set rs = CurrentDb.OpenRecordset(sql)
If Not rs.EOF Then
DoCmd.OpenForm "F_RechercherRF", acNormal, , , , acWindowNormal
DoCmd.Close acForm, "F_Authentification"
Else
MsgBox "Identifiant ou Mot de Passe incorrect ", vbCritical, "Connexion"
i = i + 1
End If
If i = 3 Then
MsgBox "Vous avez dépassé le nombre de tentatives autorisés", vbCritical
DoCmd.Quit
End If
End Sub
 
Merci pour ton aide en tout cas.  
 
salut

Reply

Marsh Posté le 28-04-2005 à 19:22:49    

dans ta table Utilisateur il y a le nom et le prénom du type je suppose?
dans ce cas il te suffit d'affecter le nom et le prénom dans 2 variables!!!!
et pour ce qui est de la réutilisation des variables dit moi ou tu veux les mettre je t'envoie le code

Reply

Marsh Posté le 28-04-2005 à 22:36:24    

bonsoir, excuse moi pour le retard. alors ce que je voudrais, c'est que lorsque j'arrive dans mon formulaire "F_RechercherRF" (cf code du formulaire "F_Autentification" ):
 
1° j'ai un message dans mon formulaire (en haut à gauche dans l'en tête par exemple): Bienvenue ..... ..... (avec à la place des pointillés le prénom et le nom de la personne qui s'est authentifié. (bien évidemment, comme tu me l'a fait remarqué, j'ai un champ nom et un champ prénom dans ma table utilisateur)
 
2° en fait le truc, c'est que je ne sais pas dans quoi mettre ce message (une zone de texte me parait être la meilleure solution).
 
voila, j'éspère que tu vois un peu mieu ce que je faire dans mon appli.  
 
merci encore  
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed