¿Cómo obtener el nombre de usuario registrado en Access vba?

Posible duplicado:
¿Hay alguna forma de que MS Access pueda obtener el usuario actual de Active Directory?

Deseo obtener el nombre del usuario conectado a través de vba en el acceso . ¿Cuál es la mejor manera de hacer esto?


Duplicados de esta pregunta:

  • ¿Hay alguna forma de que MS Access pueda obtener el usuario actual de Active Directory?
  • Usando VB6, ¿cómo obtengo el usuario y el dominio actual en Windows XP?
  • ¿Cómo puedo obtener el usuario de Windows actualmente conectado en Access VBA?
  • Excel 2007 VBA y WMI – DOMINIO \ USUARIO actual

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)) 

Resulta que la pregunta se ha hecho antes: ¿Cómo puedo obtener el usuario de Windows actualmente conectado en Access VBA?

Prueba esto:

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

En un formulario, crear un cuadro de texto, con las propiedades del cuadro de texto seleccionar pestaña de datos

 Default value =CurrentUser() 

Fuente actual “seleccionar nombre de campo de tabla”

Mostrará el nombre de inicio de sesión del usuario actual en el cuadro de texto / etiqueta y guardará el nombre de usuario en el campo de la tabla