ver usuario en access

glider
20 de Febrero del 2004
Es posible ver en un formulario de access el nombre del usuario acualmente logado en red en esa maquina. Lo necesito para saber quien imprime cada informe.
gracias por vuestra ayuda.

fjgordon
20 de Febrero del 2004
Prueba a usar esta función


Public Function ObtenerUsuario() As String
Dim lpBuffer As String * 255
Dim nSize As Long
Dim Ret As Long
nSize = 255
Ret = GetUserName(lpBuffer, nSize)
If Ret = 1 Then
nSize = nSize - 1
ObtenerUsuario = Left(lpBuffer, nSize)
Else
ObtenerUsuario = "."
End If
End Function