How to check whether the user is an administrator
Posted on January 4, 2009
1 2 3 4 5 6 7 | 'Network - How to check whether the user is an administrator Private Declare Function IsNTAdmin Lib "advpack.dll" (ByVal dwReserved As Long, _ ByRef lpdwReserved As Long) As Long Sub main() Debug.Print "Are you an Administrator? " & CBool(IsNTAdmin(ByVal 0&, ByVal 0&)) End Sub |