[AC-2003] besoin d'aide sur donnee utilisateur [Résolu]

[revemane]

bonsoir

voici mon probleme
dans un formulaire j'ai une txtbox (txt_user) dans lequel s'affiche le non d'utilisateur recuperé avec la fonction USERNAME
le probleme c'est que les nom d'utilisateur que je récupere sont sous forme alfa numérique ( exemple U01258,VL47895, etc)
j'ai créer un table tbl_user avec 3 champs (ID_UTILISATEUR, NOM,PRENOM)
je souhaiterai que quand mon formulaire capture le username sous forme alfa numerique faire apparaitre dans une txtbox le nom et prenom de cet id

je ne sais pas comment rediger le code

merci pour votre aide

[Philippe JOCHMANS]

Bonjour

Si j'ai bien compris, c'est l'Id (U01258) que tu récupères par Environ ("username").

Donc un tuto à lire : Affichage de données dans des Labels, Zones de texte ou MsgBox.

Philippe

[revemane]

oui c'est bien ca je recupere (u01258) je viens de lire le tuto mais je ne vois pas bien ce que je dois faire pour ma demande
serait il possible d'avoir un exemple de code afin que je comprenne comment je dois faire

merci d'avance

[User]

Salut,

Comme expliqué dans le tuto, il te faut ouvrir un recordset DAO ou une fonction de domaine donnant le nom et prénom de l'utilisateur choisi :

exemple sur ouverture de ton formulaire :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Form_Open(Cancel As Integer)
Dim rst As DAO.Recordset
Dim ID_User As String
 
ID_User = Environ ("username") ' récupération du user
 
Set rst = CurrentDb.OpenRecordset("select * from tbl_User where ID_Utilisateur='" & ID_User & "'")
 
Me!ID_Utilisateur = ID_User ' copie du User dans une zone de texte
 
'Puis copie des nom et prénom sur 2 lignes
Me!TextBox = "Nom : " & rst!Nom & vbNewLine & "Prénom : " & rst!Prenom
 
rst.Close ' fermeture et libération des variables.
Set rst = Nothing
 
End Sub

A+