С ходу могу предложить 3 варианта (кому-то покажутся они грубоватыми), а может кто и лучше подскажет решение:
Первый вариант
Set objDomain1 = GetObject("LDAP://usl.local/OU=Computers,OU=Центр,OU=НашаФирма,DC=usl,DC=local")
Set objDomain2 = GetObject("LDAP://usl.local/OU=Computers,OU=Регион1,OU=НашаФирма,DC=usl,DC=local")
Set objDomain3 = GetObject("LDAP://usl.local/OU=Computers,OU=Регион2,OU=НашаФирма,DC=usl,DC=local")
...
Set objDomainN = GetObject("LDAP://usl.local/OU=Computers,OU=РегионN,OU=НашаФирма,DC=usl,DC=local")
после чего, так же для каждого объекта создать свой массив и заполнять их по-отдельности.
Второй вариант — массив массивов из объектов.
Задать переменную OUшек массивом из оных:
Третий вариант
OUs = ("Центр","Регион1",...,"РегионN")
for each OUItem in OUs:
Set objDomain = GetObject("LDAP://usl.local/OU=Computers,OU=" & OUItem & ",OU=НашаФирма,DC=usl,DC=local")
<Код заполнения массива имен компьютеров>
next
Да, я с Вами согласен, что можно было поступить проще и изящнее. Я сделал замену в notepad++ по регулярке и потому то, что вы считаете удвоением было произведено моментально. Сейчас код имеет совершенно иной вид и работает по-другому (идет запись в БД MySQL, а данные в свою очередь выгружаются на php страничку).
Сначала написал представление на html, а потом скопировал код и добавил в начало каждой строки код записи, особо заниматься организацией красивого кода времени не было, т.к. нужно было это решение сделать в достаточно короткие сроки. Сам сценарий написать — час от силы со всеми проверками и условиями, но разбор работы с самим WMI и поиск информации о представлении в нем(wmi) сведений об антивирусе заняло много времени. Для меня WMI был темным лесом на тот момент.
Можно, но я решил сделать так, потому что мне так удобнее, на вкус и цвет как говорится… вариантов как и куда складировать данные уйма (есть вариант и с MySQL), так что это на любителя
Так технический прогресс в стране ведь начался)
после чего, так же для каждого объекта создать свой массив и заполнять их по-отдельности.
Второй вариант — массив массивов из объектов.
Задать переменную OUшек массивом из оных: