Как определить сколько компов не втянуто в домен
 

Доброго времени суток.
Прошу Вашей помощи в такой проблеме:
Есть корпоративная сеть с каким то количеством компов(прибл. 100-150).
Большинство компов находятся в домене. 2-5% компов еще не втянуты.
как вычислить компы которые еще в домен не втянуты?

werty1_1, в сетевом окружении отдельно домен и рабочая группа?

Petya V4sechkin, да в сетевом окружении есть отдельно домен и рабочая группа

но на данный момент надо определить компы которые находятся в главном офисе. а не полностью во всей сети

И по какому критерию вы предлагаете это определять?
Чем отличаются компьютеры в главном офисе от остальных?

Petya V4sechkin, Они ни чем не отличаются. Поставлена задача втянуть все компы главного офиса в домен. Именно для этого надо и определить кто еще не втянут. Чтобы по удаленке проделать все остальные действия

Ага, вы не знаете, какие компьютеры в главном офисе?

Petya V4sechkin, какие из всей сети находятся в главном офисе не известно.

Если даже вам это неизвестно, то мне и подавно :)

Цитата:

Поди туда - не знаю куда, принеси то - не знаю что

Может, они в одной подсети?
Спросите у своих коллег - сотрудников IT-отдела.

Как вариант:

On Error Resume Next
Set objShell = CreateObject("Wscript.Shell")
Set FS = CreateObject("Scripting.FileSystemOBject")
Set WshNetwork = WScript.CreateObject("WScript.Network")

If WshNetwork.UserDomain=WshNetwork.ComputerName Then
WScript.Echo "Сообщите админу - комп не в домене!"
end if

Этот скрипт зашить в сценарий входа в домен.
Если комп не в домене не выполнится, поэтому вместо сообщения лучше кидать файлы в сеть по IP (создавать текстовой файл с именем по IP, а внего еще и записать что выдает WshNetwork.UserDomain)