Меню Сервис - Сканировать компьютеры в сети - кнопка Сканировать сеть,
оптичиваю 1 ПК, который доступен по сети в данный момент и на нем XP SP2
нажимаю кнопку с лупой (Просмотр конфигурации). Получаю окно с пустой конфигурацией:
"Processors:
Motherboard:
RAM:
Disks:
NetAdapters: "
Если нажать там кнопку Импорт, тоже самое - добавляется строка, в которой заполнено только имя ПК.
Пошарив в Инете, нашел рекомендации по корректной настройке WMI:
- служба "Запуск серверных процессов DCOM (DCOM Server Process Launcher"),
- служба "Инструментарий управления Windows (Windows Management Instrumentation)"
- классическая модель доступа к ресурсам.
- брандмауер вообще отключил
- разрешен удаленный запуск DCOM через dcomcnfg.exe

Все это проверил - результата нет. При этом инфа о том же ПК, с которого запускается прога, работает.

ЧТО НУЖНО СДЕЛАТЬ, чтобы сбор конфигурации удаленных ПК из WMI заработал.
Спасибо.

Увы, мы не можем вам четко это сказать.
Во многих сетях сканирование работает, в каких-то подобные проблемы.
При наших тестах - при отключенном брандмауре на удаленном компьютере сканирование его конфигурации начинает работать.

Вы можете запускать файлы скрипты ScanNetwork.vbs или ScanNetwork2.vbs, расположенные в рабочей папке программы. Их можно как-то изменять, если открыть в Блокноте, и адаптировать под свои нужды.

Кроме того, возможно у вас заработает сканирование, если будет существовать любая папка с общим доступом на чтение и запись на удаленном компьютере. Сканирование должно работать в этом случае по особому сценарию.

_________________
2B OR NOT 2B = TRUE

Шара на чтение/запись для всех есть. По особому сценарию не работает. Копирует CompInfo.vbs именно в корень C:\
Попытался запустить этот скрипт локально из этого места. Получил ошибку "Неверный дескриптор". Это нормально?

Как импортировать из csv не понятно. Для четырех полей текстового файла есть только одно поле в таблице. Нужно добавлять поля в табл. Устройства (tblMain) ? Ими как-то можно склеить поля CVS в одно поле Таблицы Устройства (tblMain) по аналогии с формочкой Сканирования сети? Возможности такой не нашел, левый столбик таблицы соответствия серый.

Файл CompInfo.vbs нельзя запускать отдельно, он работате только при управлении из программы.
А говорил я вам про файлы ScanNetwork.vbs ScanNetwork2.vbs

Да, вы можете создать 4 поля в таблице tblMain, куда импортировать. Склеить не получится.
Нужно либо подправить скрипт, формирующий одно поле (а не 4), либо написать свою процедуру импорта, склеивающую 4 поля в одно.

_________________
2B OR NOT 2B = TRUE

Возможен ли групповой сбор информации о конфигурации ПК в сети с помощью файла ScanNetwork.vbs ?
Скажем, в сети около сотни ПК. Как наиболее рационально организовать работу по заполнению БД?
Поля "Processor";"MB";"RAM";"Disks";"Net" в таблицу tblMain добавлены. Также добавлено вычисляемое
поле = [Processor] & ' / ' & [MB] & ' / ' & [RAM] & ' / ' & [Disks] & ' / ' & [Net]

В файле ScanNetwork.vbs в первой строчке прописан путь к CSV файлу с результатами сканирования ScanNetworkResult.csv.
Укажите сетевой путь к данному файлу в общей папке, видимой для всех компьютеров.
Далее поочереди запускайте файл ScanNetwork.vbs от имени каждого пользователя каждого компьютера.
Информация должна каждый раз добавляться в целевой файл ScanNetworkResult.csv.
После этого нужно импортировать данные в БД из этого файла.
Вот так можно организовать.

_________________
2B OR NOT 2B = TRUE

Так и не могу разобраться в работе сбора информации с удаленных ПК.
Глядя на CompInfo.vbs, понял, что вместо полного имени пользователя нужно подавать только вторую часть. Доменное имя вообще не принимается, а на его место подставляется имя ПК, т.е. только локальное имя можно использовать.
Редактирование CompInfo.vbs ни к чему не приводит.
Если авторизация НЕ проходит, то на удаленный ПК копируется CompInfo.vbs из каталога программы и ничего не возвращается, потому что авторизация не проходит. Если для авторизации использовать локальное имя, то CompInfo.vbs НЕ копируется на удаленный ПК, а в ответе получаются данные без моих исправлений.
Как управлять сбором информации? Хотел добавить название операционки:

Set colSettings = objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem")
For Each oEach In colSettings
If sOSName > "" Then sOSName = sOSName & ", "
sOSName = sOSName & oEach.Caption & ". v. " & oEach.Version
Next

и внизу дописал:

sResult = sResult & vbCrLf & "OS|" & sOSName

ну и объявление для sOSName добавил.

Спасибо.

По данной теме мы добавили типовой вопрос №31. Пожайлуста, прочтите и попробуйте сделать то, что там написано.

_________________
2B OR NOT 2B = TRUE

Я же сразу написал в самом первом сообщении, что все это проделал до того, как написал сюда.
Сейчас вопрос по скрипту CompInfo.vbs
От куда он берется, если изменения в этом файле из каталога программы не отражаются на том файле, который копируется на удаленный ПК.

Все, что вы пишите, довольно странно.
Во-первых, с отключенным файерволлом сканирование у нас всегда работает и на удаленном компьютере, и тем более на локальном.
Во-вторых, имеется запасной алгортим (который рассчитан, когда файерволл включен и не нестроен должным образом, чтобы можно было сканировать), в соответствии с которым файл CompInfo.vbs, содержащийся в рабочей папке программы, копируется на удаленный компьютер (должен быть не гостевой доступ, а обычный) и выполняется.
Если вы говорите, у вас даже файл не копируется, то, может быть, вы не туда сморите или он уже откопирован.
Логин и пароль администратора удаленного компьютера вы правильно указываете?
При наших тестах с WindowsXP (SP3) работает и первый и воторой подход.
Попробуйте поставить SP3 на WindowsXP.

_________________
2B OR NOT 2B = TRUE

SP3 поставил
Сейчас ситуация с этой машиной такая:
Файл НЕ копируется вовсе, но конфигурацию программа показывает. Показывает в том объеме и в том формате, как это записано в первоначальном варианте файла CompInfo.vbs. Данных там маловато и хотелось добавлять туда поля, как я описывал раньше. Но изменение файла CompInfo.vbs в каталоге программы не влияет на собираемую информацию.
Вопрос. Как вмешаться в этот алгоритм
Спасибо.

Да, когда прекрасно отрабатывает первый подход, файл не копируется (копирование файла - это подход 2).
Как вмешаться?
В рабочей папке есть много других файлов-скриптов VBS. В т.ч. и по сканированию (ScanNetwork.vbs и ScanNetwork2.vbs).
Редактируйте их. Они независимы и отрабатывают при простом двойном клике.
Как писать данные в БД? - смотрите другие примеры (ScriptExample1.vbs, ScriptExample2.vbs, ScriptExample3.vbs).
Отредактированный и настроенный ваш собственный файл-скрипт VBS можно связать с пользовательской кнопкой на панели инструментов или пользовательским пунктом меню.

_________________
2B OR NOT 2B = TRUE

Мы в свою очередь тоже подумаем, как все это можно улучшить для более гибкой настройки и выборе произвольных свойств.

_________________
2B OR NOT 2B = TRUE

kwas писал(а) :
> Шара на чтение/запись для всех есть. По особому сценарию не работает.
> Копирует CompInfo.vbs именно в корень C:\
> Попытался запустить этот скрипт локально из этого места. Получил ошибку
> "Неверный дескриптор". Это нормально?

Опытным путем установил, что данная ошибка выходит если скрипт запускать без cscript, т.е. д.б. так cscript c:\CompInfo.vbs > c:\1.txt
При этом не удалось даже в командной строке запустить psexec cscript c:\CompInfo.vbs > c:\1.txt (аналогичная команда запускается у вас в программе при Сканировании сети). Отсюда вопрос: возможно ли менять строку запуска команды при нажатии на кнопку "Импорт в БД".
Второй вопрос: есть ли возможность при импорте через меню Файл-Импорт добавлять сразу записи в связанные таблицы. Например, при импорте в таблицу "Устройства" так же параллельно добавлять данные в таблицы "Характеристики" и "Программное обеспечение" из одного тхт-файла (при наличии необходимых данных).