Discussion :

[tieumss]

Bonjour

Je cherche à récupérer le User XP de la personne qui lance mon appli access 2002, afin de faire afficher son nom etc...

Je n'ai trouvé aucune indication dans les tutos ou Faq...

Avez vous un source magique ?

Merci d'avance.

[philben]

bonjour,

si j'ai bien compris votre demande, voici une solution :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim sComputerName As String, sUserName As String
sComputerName = Nz(Environ("COMPUTERNAME"), "?")
sUserName = Nz(Environ("USERNAME"), "?")

cordialement,

Philippe

[tieumss]

Et la lumiere fût...

C'est parfait, c'est exactement ce que je voulais...

Merci...