Ребят, помогите добавить найденные элементы(файлы определенного расширения) в справочник...
**********************
Процедура КнопкаВыполнитьНажатие(Кнопка)
Locator = Новый ComObject("WbemScripting.SWbemLocator");
ИмяКомпьютера = ".";
ServicesSet = Locator.ConnectServer(ИмяКомпьютера, "root\cimv2");
Items = ServicesSet.ExecQuery("Select * from CIM_DataFile where Extension = 'dwg'");
Для каждого Item Из Items Цикл
Сообщить("Имя файла: " + Item.Name);
СправочникСписок.Обновить();
// Список.Добавить(Item.Name);
стр=Справочники.Проект.НайтиПоНаименованию(Item.Name,Истина);
Если стр.Пустая() Тогда
об=Справочники.Проект.СоздатьЭлемент();
об.Наименование=Item.Name;
Иначе
об=стр.ПолучитьОбъект();
КонецЕсли;
об.ПутьКФайлу="";
об.Записать();
КонецЦикла;
КонецПроцедуры
**********************************
Скрины...
http://s57.radikal.ru/i155/1005/41/7d328443cded.jpg
http://i074.radikal.ru/1005/af/818710f8e46f.jpg

Программист 1с,

Может, но вопрос не в этом...

Программист 1с,

Нужно, чтоб файлы, которые находятся с определенным расширением, добавлялись в справочник, а не в служебные сообщения...

Программист 1с

[/quot]Ну так они и добавляются... Проверьте после записи любого элемента - поиском по наименованию что он есть.[/quot]

Справочник после поиска файлов пустой, следовательно там ничего нет...

Программист 1с,

Тоже не идет... Пробовал это сделать с полем списка через Список.добавить(item.name), все было норм, в справочнике так не идет...

Программист 1с,

Справочник ничему не подчинен, отбор в форме не стоит, элемент создается так... В крайнем случае могу скинуть базу, посмотрите...

Программист 1с,

тут база
http://ifolder.ru/17961599