ChiefDamon
asked on
Determine Group Memberships using ADO and Active Directory
I am looking for code examples to determine a users' group memebership in Active Directory using ADO. We have Win 2000 and VB 6.0. And we want to see if a user is a member of particular group to authenticate the user using ADSI for a custom application.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Hi, welcome to EE!
If you are not 200% sure that you are posting a correct/real/exact answer, just post it as comment. The person who asked the question could accept your commentas an answer if it meets the requirements anyway.
Please, read guidelines about comments/answers at bottom of this page.
If you post an answer, the question is off of list of unanswered question and asker lose the posibility to receive more help from others too.
Cheers
If you are not 200% sure that you are posting a correct/real/exact answer, just post it as comment. The person who asked the question could accept your commentas an answer if it meets the requirements anyway.
Please, read guidelines about comments/answers at bottom of this page.
If you post an answer, the question is off of list of unanswered question and asker lose the posibility to receive more help from others too.
Cheers
I use this code in my applications so I know it works, but I was unaware an answer prevented further comments. Thanks for the advice.
Three things:
1) After the IADsUser and IADsGroup object is SET, you need to make a call to gather the information. Use this code in the IsUserInGroup Function.
adsUser.GetInfo
adsGroup.GetInfo
2) Don't use "Domain Users" as the default for the strGroup variable. It may not produce the results you want all the time. Choose something other then a system group.
1) After the IADsUser and IADsGroup object is SET, you need to make a call to gather the information. Use this code in the IsUserInGroup Function.
adsUser.GetInfo
adsGroup.GetInfo
2) Don't use "Domain Users" as the default for the strGroup variable. It may not produce the results you want all the time. Choose something other then a system group.
Three things:
1) After the IADsUser and IADsGroup object is SET, you need to make a call to gather the information. Use this code in the IsUserInGroup Function.
adsUser.GetInfo
adsGroup.GetInfo
2) Don't use "Domain Users" as the default for the strGroup variable. It may not produce the results you want all the time. Choose something other then a system group.
1) After the IADsUser and IADsGroup object is SET, you need to make a call to gather the information. Use this code in the IsUserInGroup Function.
adsUser.GetInfo
adsGroup.GetInfo
2) Don't use "Domain Users" as the default for the strGroup variable. It may not produce the results you want all the time. Choose something other then a system group.
gee, sorry to boring you, use reload question at right top of page instead of Refresh browser's button.
Yeah, I noticed that. My bad. I left the third thing out too, which was to DIM the objects in the IsUserInGroup funciton.
Dim adsUser as IADsUser
Dim adsGroup as IADsGroup
I'll be crawling under for a bit now....
Dim adsUser as IADsUser
Dim adsGroup as IADsGroup
I'll be crawling under for a bit now....
I read in the previous question you had the user stated that you can't authenticate a user programatically. You can. Use the reference to Windows Script Hosting.
I use it once, but I am not sure on the complete code.
Here is a start.
Dim wsh as WshShell
Dim network as WshNetwork(?)
Set wsh = New WshShell
Set network = wsh.network
username = network.username
Hope it helps
I use it once, but I am not sure on the complete code.
Here is a start.
Dim wsh as WshShell
Dim network as WshNetwork(?)
Set wsh = New WshShell
Set network = wsh.network
username = network.username
Hope it helps
https://www.experts-exchange.com/msaccess/Q.20300566.html