Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Rolenarim

Старожил


Сообщения: 150
Благодарности: 26

Профиль | Отправить PM | Цитировать


На данный момент все компьютеры находятся в 2-х OU (Domain Controllers и Computers), Ни та ни другая OU не содержит того перечня компьютеров (вместе взятых), необходимых для обрабатываемого скрипта.

Однако есть еще OU Group и внутри нее подгруппа SC (не знаю как она характеризуется), в нее я и включил нужный список компьютеров.

UPD:

В общем создал дополнительные OU, в которых разбил более детально все машины и сделал скрипт на основе предложения Iska:

Код: Выделить весь код
If StrComp( _
		GetObject("LDAP://" & WScript.CreateObject("ADSystemInfo").ComputerName).Parent, _
		"LDAP://OU=DopOU,DC=SRV,DC=RU", _
		vbTextCompare _
	) = 0 Then
	
	' Place your code here
End If
Спасибо за помощь.

-------
Если информация Вам помогла, не забывайте нажимать под ней на кнопку "Полезное сообщение"


Последний раз редактировалось Rolenarim, 28-09-2015 в 13:54. Причина: Задача решена


Отправлено: 07:11, 28-09-2015 | #12