Помогите кто знает

Форум Программирование Общие вопросы программирования (Dev)

Платформа 1С v7.7

1. serg76 313 01.08.06 00:51 Сейчас в теме

Если кто-нибудь знает команду Windows 2000/XP c помощью которой можно вывести в файл (любого формата) имена активных сетевых компьютеров в домене буду очень признателен (нужен эдакий аналог команды net view только с выводом не на экран, а в файл).

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. CheBurator 3119 01.08.06 03:37 Сейчас в теме

есть такое понятие как "переназначение ввода-вывода"
пиши net view как положено, примерно так
net view ТутПараметрыКакиеНадо >cheburashka.txt
1. скобка пред именем файла обязательная
2. имя файла д.б. именно cheburashka.txt

3. vasilykushnir 63 01.08.06 08:46 Сейчас в теме

Сhe Burashka Написал:
-------------------------------------------------------
> 2. имя файла д.б. именно cheburashka.txt

Небольшая ошибочка (или опечатка) - если правильно, то имя файла:
CheBurashka.txt

4. serg76 313 01.08.06 14:02 Сейчас в теме

Спасибо! Приму к сведению (особенно п.2)!!!

5. CheBurator 3119 01.08.06 14:05 Сейчас в теме

Результат сообщи обязательно!

6. harleq 27 01.08.06 16:32 Сейчас в теме

Код
COMServices = СоздатьОбъект("COMServices.COM"); Locator = СоздатьОбъект("WbemScripting.SWbemLocator"); ServicesSet = Locator.ConnectServer(ИмяСервера, "root\cimv2", Пользователь, Пароль); Items = ServicesSet.ExecQuery("Select * from Win32_ComputerSystem"); Для Ном = 0 По Items.Count-1 Цикл Item = COMServices.EnumerateCollection(Items,Ном); Сообщить("Имя: " + Item.Name); Сообщить("Домен: " + Item.Domain); КонецЦикла; Показать полностью

Код

   COMServices = СоздатьОбъект("COMServices.COM");
   Locator = СоздатьОбъект("WbemScripting.SWbemLocator");
   ServicesSet = Locator.ConnectServer(ИмяСервера, "root\cimv2", Пользователь, Пароль);
   Items = ServicesSet.ExecQuery("Select * from Win32_ComputerSystem");
   Для Ном = 0 По Items.Count-1 Цикл
      Item = COMServices.EnumerateCollection(Items,Ном);
      Сообщить("Имя: " + Item.Name);
      Сообщить("Домен: " + Item.Domain);
   КонецЦикла;

Показать полностью

COM-объект COMServices, предназначенный для работы с COM-объектами в систем 1С:Предприятие 7.7. в приложении

Прикрепленные файлы:

COMServices.rar

Оставьте свое сообщение

E-mail: