Enumerate members of a domain group

Wednesday Apr 20th 2005 by DatabaseJournal.com Staff
Share:

This script enumerates the members of a domain group.



>>Script Language and Platform: VbScript
cscript EnumGroupMembers.vbs "Group Name" "Domain Name"



Example:

cscript EnumGroupMembers.vbs  "Tech SQLDBA" "Americas"


Result:
Amuthusamy
CHsu
KKordell

Author: MAK


'Objective: To enumerate the members of a domain group
'Created by: MAK
'Date: April 11,2005
Dim Group
Dim GroupName
Dim GroupDomain
Dim objArgs 

Set objArgs = WScript.Arguments
GroupName =objArgs(0)
GroupDomain=objArgs(1)

Set Group = GetObject("WinNT://" & GroupDomain & "/" & GroupName & ",group")
For Each Member in Group.Members
     WScript.Echo Member.Name
Next

Disclaimer: We hope that the information on these script pages is valuable to you. Your use of the information contained in these pages, however, is at your sole risk. All information on these pages is provided "as -is", without any warranty, whether express or implied, of its accuracy, completeness, or fitness for a particular purpose... Disclaimer Continued


Back to Database Journal Home

Share:
Home
Mobile Site | Full Site
Copyright 2017 © QuinStreet Inc. All Rights Reserved