Comment obtenir le nom d'utilisateur connecté dans Access vba?

Question

Possible en double:
Is there a way for MS Access to grab the current Active Directory user?

Je veux obtenir le nom de la via vba dans access utilisateur connecté. Quelle est la meilleure façon de procéder?

---

Doublons de cette question:

• Is there a way for MS Access to grab the current Active Directory user?
• Using VB6, how do I get the current user and domain on Windows XP?
• How can I get the currently logged-in windows user in Access VBA?
• Excel 2007 VBA and WMI - Current DOMAIN\USER

Answer 1

Public Declare Function GetUserName Lib "advapi32.dll" 
    Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long 

....

Dim strLen As Long 
Dim strtmp As String * 256 
Dim strUserName As String 

strLen = 255 
GetUserName strtmp, strLen 
strUserName = Trim$(TrimNull(strtmp)) 

Transforme en question a été posée: How can I get the currently logged-in windows user in Access VBA?

Answer 2

Essayez ceci:

Function UserNameWindows() As String 
    UserName = Environ("USERNAME") 
End Function 

Answer 3

Dans un formulaire, créer une zone de texte, avec des propriétés de zone de texte sélectionnez de données tab

Default value =CurrentUser() 

rce « nom du champ de table sélectionnez »

Il affiche journal de l'utilisateur courant sur le nom dans la boîte/étiquette de texte ainsi que enregistre le nom d'utilisateur dans le champ de la table