|
|
|
|
|
Dicas
|
|
Visual Basic (ActiveX/Controles/DLL)
|
|
|
Título da Dica: identificar se o usuário logado é administrador nos Windows XP e 2000 através do VB
|
|
|
|
Postada em 5/4/2006 por Geronimo
Private Declare Function IsNTAdmin Lib "advpack.dll" (ByVal dwReserved As Long, ByRef lpdwReserved As Long) As Long
Private Function IsAdmin() As Boolean
IsAdmin = CBool(IsNTAdmin(ByVal 0&, ByVal 0&))
End Function
|
|
|
|
|