ms-access - ejemplos funcion dlookup access

¿Cómo iniciar sesión en el nombre de usuario en Access vba?

Question

Posible duplicado:
¿Hay alguna forma para que MS Access pueda capturar al usuario actual de Active Directory?

Quiero obtener el nombre del usuario que ha iniciado sesión a través de vba en access . ¿Cuál es la mejor manera de hacer esto?

Duplicados de esta pregunta:

• ¿Hay alguna forma para que MS Access pueda capturar al usuario actual de Active Directory?
• Con VB6, ¿cómo obtengo el usuario y el dominio actuales en Windows XP?
• ¿Cómo puedo obtener el usuario de Windows actualmente conectado en Access VBA?
• Excel 2007 VBA y WMI - DOMINIO / USUARIO actual

Answer 1

En un formulario, cree un cuadro de texto, con las propiedades del cuadro de texto, seleccione la pestaña de datos

Default value =CurrentUser()

Fuente actual "seleccionar el nombre del campo de la 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

Answer 2

Prueba esto:

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

Answer 3

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 que ha iniciado sesión actualmente en Access VBA?