VB: Usuario conectado en un PC

[guif]

Como puedo saber el usuario que hay conectado en un PC?
La idea que tengo, es entrar a \\equipo\c$\Documents and Settings\ y ordenar las carpetas por fechas y escoger, logicamente, la mas reciente, pero... como hacer esto??

[David]

Iniciado por guif

Como puedo saber el usuario que hay conectado en un PC?
La idea que tengo, es entrar a \\equipo\c$\Documents and Settings\ y ordenar las carpetas por fechas y escoger, logicamente, la mas reciente, pero... como hacer esto??

No entiendo, ¿qué tiene que ver el hecho de saber qué usuario está conectado a un PC y ordenar las carpetas por fecha?. Lo de ordenar por fecha puedes hacer con FileSystemObject...

[guif]

Lo que necesito es saber el usuario que hay conectado en ese momento en un PC.
Algun script o algun trozo de codigo que me diga el ultimo que ha entrado.

[guif]

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

[David]

Iniciado por guif

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

Si tienes tu programa en la otra máquina, es fácil, con Sockets puedes pasarle el nombre de usuario, pero si no hay un programa que te conteste, no sé cómo sería.

[guif]

he visto este enlace, donde te permite extraer informacion de un PC:

http://vbnet.mvps.org/index.html?cod...sergetinfo.htm

pero... como puedo hacer para especificar un PC del dominio para que me devuelva el usuario que esta conectado?