Hello everyone. I have the following case: when I trying to collect all userIDs from the specific group Domain Admins, then the UserID which have been set as Primary Group for Domain Admins not listening:
VB Script code:
Option Explicit
Dim objRootLDAP, objGroup, objUser, objOU, objmemberOf
Dim strOU, strGroup, strDNSDomain, strLDAP, strList, strUser
Set objRootLDAP = GetObject("LDAP://RootDSE")
strDNSDomain = objRootLDAP.Get("DefaultNamingContext")
strGroup ="cn=Domain Admins,"
strOU ="CN=Users,"
strLDAP ="LDAP://" & strGroup & strOU & strDNSDomain
Set objGroup = GetObject(strLDAP)
For Each strUser in objGroup.Member
Set objUser = GetObject("LDAP://" & strUser)
strList = strList & objUser.CN & vbcr
Next
WScript.Echo "Users for " & strGroup & vbCr & strList
WScript.Quit
But when the Primary group for the UserID have been set to Domain Users then the UserID collecting with the code above.
I welcome any suggestions.
Thank you.
Bookmarks