делаю так копирую на диск потом пытаюсь загрузить. но в созданом элементе НоменклатураПрисоединенныеФайлы файл не работает пишет ошибку про двоичные данные!
записи делает а вот картинку открыть там немогу она туда толи не попадает толи не так попадает как надо
Что в коде не правильно подскажите ?
ИсходныйАдрес=Стр.image;
ТекстКартинки=СокрЛП(СтрЗаменить(ИсходныйАдрес,"https://lido.ua",""));
ИмяКартинкиНаДиске="C:\Users\123\Desktop\temp\"+Строка(Спр.Код)+".jpeg";
Соединение = Новый HTTPСоединение("lido.ua",443,,,,,Новый ЗащищенноеСоединениеOpenSSL(), Ложь);
Соединение.Получить(ТекстКартинки,ИмяКартинкиНаДиске);
//Спр.ФайлКартинки = Новый ХранилищеЗначения(Новый Картинка(ИмяКартинкиНаДиске));
//Спр.Записать();
КартинкаОбъект = Справочники.НоменклатураПрисоединенныеФайлы.СоздатьЭлемент();
КартинкаОбъект.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе;
КартинкаОбъект.Наименование = Спр.Код;
КартинкаОбъект.ВладелецФайла = Спр.Ссылка;
КартинкаОбъект.ДатаСоздания = ТекущаяДата();
КартинкаОбъект.ДатаЗаема = ТекущаяДата();
КартинкаОбъект.ДатаМодификацииУниверсальная = ТекущаяДата();
//КартинкаОбъект.ПутьКФайлу = ИмяКартинкиНаДиске;
// Номенклатура.Картинка = Новый ХранилищеЗначения(Новый Картинка(ИмяКартинкиНаДиске));
К1 = Новый Картинка(ИмяКартинкиНаДиске, истина);
КартинкаОбъект.ФайлХранилище = Новый ХранилищеЗначения(К1.ПолучитьДвоичныеДанные());
КартинкаОбъект.Расширение = "jpeg";
КартинкаОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ФайлК = Новый Файл(ИмяКартинкиНаДиске);
КартинкаОбъект.Размер = ФайлК.Размер();
КартинкаОбъект.Записать();
Спр.ФайлКартинки = КартинкаОбъект.Ссылка;
как всегда в принципе!
а чем БСП не угодило?
ДобавитьФайлыРасширениеПредложено(......)
sava1 @ Сегодня, 14:54
,
я делаю програмно как туда передать из процедуры на сервере? как из моего цикла туда впихнуть
так файл можно на клиента сохранять (что в-принципе и логичнее)
ИЛИ поместить в хранилище и передать в ВызовСервера
ПрисоединенныйФайл = ПрисоединенныеФайлыСлужебныйВызовСервера.ДобавитьФайл(
ВладелецФайла,
ИмяБезРасширения,
ОбщегоНазначенияКлиентСервер.РасширениеБезТочки(Файл.Расширение),
,
ВремяИзмененияУниверсальное,
АдресВременногоХранилищаФайла,
АдресВременногоХранилищаТекста);
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua