VB Script To List Members of AD Groups
strScanGroups = “Domain Admins,Enterprise Admins,Schema Admins” strSMTPRelay = “relay.yourcompany.corp” strFrom = “Administrator@yourcompany.com” strTo = “helpdesk@yourcompany.com” Dim rootDSE, domainObject, adDomain, mailDomain Set rootDSE = GetObject(“LDAP://RootDSE”) domainContainer = rootDSE.Get(“defaultNamingContext”) Set domainObject = GetObject(“LDAP://” & domainContainer) Set fs = CreateObject (“Scripting.FileSystemObject”) Set outFile … Continue reading →
