Enumerate ActiveDirectory Group Members

This simple VBS script binds to a AD group and enumerates it’s members: Option Explicit Dim strMember, strDNSDomain, strContainer Dim objGroup, objRootDSE Dim arrMemberOf, strList, arrGroup ‚ Bind to Active Directory’ Set objRootDSE = GetObject(„LDAP://RootDSE”) strDNSDomain = objRootDSE.Get(„DefaultNamingContext”) ‚ Bind to a group Object ‚ — By ldap path ‚strContainer …