Имя: Пароль:
1C
1С v8
Перенос картинки из одной базы в другую
0 Tumakota
 
02.07.15
18:12
Если ЗначениеЗаполнено(ОсновноеИзображение.ИмяФайла) Тогда
                 КартинкаТовара = ОсновноеИзображение.Хранилище.Получить();
                 ХДИ= Справочники.НоменклатураПрисоединенныеФайлы.СоздатьЭлемент();
                 Если КартинкаТовара=Неопределено Тогда
                     Продолжить;
                 КонецЕсли;
                 КартинкаТовара.Записать(ПутьКВременномуФайлу);              
                 V8Картинка=Base1С.NewObject("Picture",ПутьКВременномуФайлу);
                 V8Хранилище = Base1С.NewObject("ХранилищеЗначения", V8Картинка);
                 ХДИ.Наименование = ОсновноеИзображение.Description;
                 ХДИ.ВладелецФайла = Справочники.Номенклатура.ПолучитьСсылку(Новый УникальныйИдентификатор(ГУИДНОМ));
                 ХДИ.ФайлХранилище= V8Хранилище;
                 ХДИ.ТекстХранилище = V8Хранилище;
                 ХДИ.Записать();
                
        КонецЕсли;


выполняется без ошибок, при открывании номенклатуры картинки нету, в присоединенных файлах есть, но когда пытаюсь открыть выдает сообщение


"111111111111111111111111.".

Файл не найден в хранилище файлов.
Возможно файл удален антивирусной программой.
Обратитесь к администратору.
            ВызватьИсключение ФайловыеФункцииСлужебныйКлиентСервер.ОшибкаФайлНеНайденВХранилищеФайлов(