Visual Basic Scripts to enumerate data from Active Directory