Проверка пользователя возможна?

[LLL]

Скажите плз, а возможно впринцыпи в прогу вставить проверку имени пользователя Виндоса на данной машине? Такой себе Windows Auturization?
И в зависимости от того, кто за машиной залогинился, програмно давать те или иные права и возможности?

Спс.

[tyomitch]

Кажется, WNetGetUser возвращает имя текущего юзера...

[Sebas]

API GetUserName

или тебе пароль проверять надо?

[LLL]

Не, пароль ненадо, просто чтоб прога пользователя знала

[Морфий]

Вот ещё вариант через WMI:

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

strComputer = "localhost"
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")
Set colComputer = objWMIService.ExecQuery _
    ("Select * from Win32_ComputerSystem")

For Each objComputer In colComputer
    MsgBox objComputer.UserName
Next


[Inferno]

Это имеет место на NТ образных системах в виндах 9x смысл теряется.