Список компьютеров в домене

Тема в разделе "Delphi - Система", создана пользователем Barmutik, 7 фев 2006.

Статус темы:
Закрыта.
  1. Barmutik

    Barmutik Гость

    Привет!

    Возникла следующая необходимость.. вот есть домен... нужно узнать список зарагестрированных на нём рабочих станций... ситуации может быть две как выяснилось ... еслидомен на АктивДиректори и без неё ...

    Может у кого есть опыт или кто сталкивался .. или где почитать ?

    Интересует именно список в домене .. а не активных в текущий момент(это проблем не состовляет)...
     
  2. Di_Man

    Di_Man Гость

    я как-то себе скриптик на wsh написал просто выводит список объектов

    Код (Text):
    var ObjForPrint = "User";

    ListPC();

    function ListPC()
    {
    var str="";
    var i=0;
    try
     {
     var NameSpaceObj = GetObject("WinNT://yourdomain.com");
     var e = new Enumerator(NameSpaceObj);
     for(;!e.atEnd();e.moveNext())
      {
      var obj=e.item();
      if(obj.Class == ObjForPrint)
       {
        str+=ObjForPrint+":"+obj.Name+"\n";
        i++;
       }
      }
     print("Counter: "+i+"\n"+str);
    }
    catch(e)
    {
    print( "Error: "+e.description );
    }
    }

    function print(msg)
    {
    WScript.Echo(msg);
    }
    изменияешь значение переменной ObjForPrint на Computers и будет список ПК
     
Загрузка...
Похожие Темы - Список компьютеров домене
  1. gx6060
    Ответов:
    2
    Просмотров:
    435
  2. gx6060
    Ответов:
    6
    Просмотров:
    577
  3. Shandrik
    Ответов:
    6
    Просмотров:
    813
  4. anna
    Ответов:
    8
    Просмотров:
    816
  5. erhe
    Ответов:
    10
    Просмотров:
    792
Статус темы:
Закрыта.

Поделиться этой страницей