Ver Mensaje Individual
Antiguo 13-may-2008, 08:22   #4 (permalink)
guif
guif ha deshabilitado el karma
 
Fecha de Ingreso: julio-2005
Mensajes: 94
Re: VB: Usuario conectado en un PC

mediante esta funcion, puedo sacar el usuario logeado, cambio bastante la idea, pero, seria possible poder ejecutar esta funcion en otro PC??
La idea es que yo pueda poner un PC y me devuelva el usuario.

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

Private Sub Form_Load()
Dim sBuffer As String
Dim lSize As Long

sBuffer = Space$(255)
lSize = Len(sBuffer)
Call GetUserName(sBuffer, lSize)
If lSize > 0 Then
txtUserName.Text = Left$(sBuffer, lSize)
Else
txtUserName.Text = vbNullString
End If
End Sub
guif está desconectado   Responder Citando