0
picom
06.09.17
✎
07:22
|
Спр = Справочники.Номенклатура.НайтиПоКоду(Код) ;
Сообщить ("Код "+Код+" Эл нашли "+Спр) ;
КартинкаОбъект = Справочники.НоменклатураПрисоединенныеФайлы.СоздатьЭлемент();
КартинкаОбъект.ДатаМодификацииУниверсальная = ТекущаяДата() ;
КартинкаОбъект.ДатаСоздания = ТекущаяДата() ;
КартинкаОбъект.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе;
КартинкаОбъект.Наименование = ссылкаиз;
КартинкаОбъект.ВладелецФайла = Спр;
Соединение=Новый HTTPСоединение("сайт.ру");
ИмяВременногоФайла=ПолучитьИмяВременногоФайла(".jpg");
ТоварКартинка = СтрЗаменить(ссылкаиз,";) ;
Соединение.Получить("/" + ТоварКартинка,ИмяВременногоФайла);
К1 = Новый Картинка(ИмяВременногоФайла, истина);
КартинкаОбъект.ФайлХранилище = Новый ХранилищеЗначения(К1.ПолучитьДвоичныеДанные());
КартинкаОбъект.Расширение = "jpg";
КартинкаОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ФайлК = Новый Файл(ИмяВременногоФайла);
КартинкаОбъект.Размер = ФайлК.Размер();
//Сообщить(ФайлК.Путь) ;
КартинкаОбъект.Записать();
КартинкаСсылка = КартинкаОбъект.Ссылка;
//
КартинкаСохранить = РегистрыСведений.ПрисоединенныеФайлы.СоздатьМенеджерЗаписи();
КартинкаСохранить.ПрисоединенныйФайл = КартинкаСсылка;
КартинкаСохранить.ХранимыйФайл = КартинкаОбъект.ФайлХранилище;
КартинкаСохранить.Записать();
....
Все добавляется в номенклатуру, но при попытке открыть пишет "Ошибка доступа к файлу"
Что я делаю на так?
|
|