I needed to extract a fair amount of users from a Distribution Group on a Windows SBS 2003 Server. As the Server didn’t have PowerShell installed, I used this instead.
12345678910 <span class="kwrd">Set</span> objGroup = GetObject _(<span class="str">"LDAP://cn=Group,ou=Distribution Groups,ou=MyBusiness,dc=domain,dc=local"</span>)objGroup.GetInfoarrMemberOf = objGroup.GetEx(<span class="str">"member"</span>)WScript.Echo <span class="str">"Members:"</span><span class="kwrd">For</span> <span class="kwrd">Each</span> strMember <span class="kwrd">in</span> arrMemberOfWScript.echo strMemberNext