How to Determine User Privilege

[RKHohmII]

I need to determine if the user running my program has
Administrator privileges. I would image this is easily
accessible via some class's methods, but it's not jumping out at me from the documentation. Can anyone please point me in the right direction?

Thank you,

Rick

 

[kbuc6]

You can check to see if they are in a specific group (such as administrator) by using ADSI (ActiveDs namespace).

myUsers = GetObject("WinNT://MyCompuer/Administrators&quot
Dim bAdmin as Boolean
For Each member In myUsers.Members
If member.class = "User" Then
If UCase(member.name) = "dwilli2" Then
bAdmin = True
End If
End If
Next

Hope this helps.