как да разбера дали юзера е админ?
2 отговора
113 прегледа
как да разбера дали юзера е админ?
как да разбера дали юзера който използва програмата ми (т.е текущо логнатия юзер) има права на администратор [2000/XP]?
Искам ако юзера не е админ да му покажа msgbox че трябва да се логне като админ.
Намерих разни примери обаче не винаги работят - например ако username e administrator но всъщност тоя юзер няма правата на администратор, се получава боза.
Хелп !
F1 !
thnx!
Искам ако юзера не е админ да му покажа msgbox че трябва да се логне като админ.
Намерих разни примери обаче не винаги работят - например ако username e administrator но всъщност тоя юзер няма правата на администратор, се получава боза.
Хелп !
F1 !
thnx!
Re: как да разбера дали юзера е админ?
Private Declare Function IsNTAdmin Lib "advpack.dll" (ByVal dwReserved As Long, ByRef lpdwReserved As Long) As Long
Private Sub Form_Load()
Dim bIsAdmin As Boolean
bIsAdmin = CBool(IsNTAdmin(ByVal 0&, ByVal 0&))
end sub