BobLoblaws
Programmer
Is there a way to determine what group(s) a NT User belongs to on the Domain Server through VBA or VB?
Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Finding a NT User's group
- Thread starter BobLoblaws
- Start date
- Status
- Thread starter
- #2
BobLoblaws
Programmer
In case anyone is wondering. Here is the solution.
Dim oUser As ActiveDs.IADsUser
Set oUser = GetObject("WinNT://ServerName/UserName"
Text1.Text = Text1.Text & oUser.Name
For Each grp In oUser.Groups
Text2.Text = Text2.Text & grp.Name & vbCrLf
Next
Dim oUser As ActiveDs.IADsUser
Set oUser = GetObject("WinNT://ServerName/UserName"
Text1.Text = Text1.Text & oUser.Name
For Each grp In oUser.Groups
Text2.Text = Text2.Text & grp.Name & vbCrLf
Next
- Thread starter
- #4
BobLoblaws
Programmer
It is called Active DS Library. It's near the top of the references list.
- Status
Similar threads
- Locked
- Question
- Locked
- Helpful tip
