Имя пользоваптеля

[neic]

Как узнать именя пользователей, ну тех которых после привествия!

[Sebas]

GetUserName API

[tyomitch]

А ещё WNetGetUser

[GM]

Аффтар имеет ввиду как перечислить пользователей в системе. Можна через WMI.

[neic]

А пример в студию можно?

[HotKitten]

Код: Выделить всё

' îïðåäåëåíèå èìåíè
Dim WSHNetwork
Set WSHNetwork = CreateObject("WScript.Network")
'çàãðóæàåì óñòàíîâêè ÿçûêà
Open App.Path + "\" + "language.dat" For Input As #1
Input #1, Lang
Close #1
If Lang = 1 Then
   Label = "Çäðàâñòâóéòå  " & WSHNetwork.UserName
Else
   Label = "Welcome  " & WSHNetwork.UserName
End If


из проги выдернул, так что уберёшь сам лишнее