sol14-13.vbs

Apress - Managing Enterprise Systems With The Windows Script Host Source Code

Const ADS_GROUP_TYPE_DOMAIN_LOCAL_GROUP = 4

Set objDomain = GetObject("WinNT://Acme")
Set objGroup = objDomain.Create("group", "Acctusers")
objGroup.groupType = ADS_GROUP_TYPE_DOMAIN_LOCAL_GROUP
objGroup.Description = "Accounting Users"
objGroup.SetInfo