Login Do Windows

[kuroi]

tem como saber o nome do usuario do windows q esta logado?

[mariozneto]

Tem sim Amigo!!!

Veja esta api:

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

Function GetNameofUser() As String 'RETORNA USERNAME DO PC
    Dim Buff As String
    Dim Sze As Long
    Buff = Space$(255)
    Sze = 255
    GetUserName Buff, Sze
    GetNameofUser = Left$(Buff, Sze)
End Function

Private Sub Form_Load()
MsgBox GetNameofUser
End Sub

Falow... T+

[kuroi]

valeu mario, funcionou certinho.

[mariozneto]

Precisando é só postar amigo!!!!

Falow... T+