|
загрузка Фоток в КА 2.4.13 |
☑ |
0
ChMikle
20.01.21
✎
16:54
|
надо программно загрузить фото товаров из каталога , я так понял надо в справочник номенклатура присоединенные файлы создавать подчиненные конкретной Номенклатуре записи , а саму фотку в виде двоичных данных или еще как-то куда писать , ткните носом :) ?
|
|
1
yzimin
20.01.21
✎
16:57
|
ПараметрыФайла = Новый Структура;
ПараметрыФайла.Вставить("Автор", Автор);
ПараметрыФайла.Вставить("ВладелецФайлов", НоменклатураСсылка);
ПараметрыФайла.Вставить("ИмяБезРасширения", ИмяБезРасширения);
ПараметрыФайла.Вставить("РасширениеБезТочки", РасширениеБезТочки);
ПараметрыФайла.Вставить("ВремяИзмененияУниверсальное", ТекущаяУниверсальнаяДата());
ДвоичДанные = Новый ДвоичныеДанные(ЭлементМассива.ПолноеИмя);
Адрес = ПоместитьВоВременноеХранилище(ДвоичДанные, Новый УникальныйИдентификатор);
СсылкаНаСозданныйФайл = ПрисоединенныеФайлы.ДобавитьПрисоединенныйФайл(ПараметрыФайла, Адрес);
|
|
2
ChMikle
20.01.21
✎
17:04
|
>>ПрисоединенныеФайлы.
такого модуля нет , ругается
|
|
3
Chameleon1980
20.01.21
✎
17:38
|
а если глобально поискать:
ДобавитьПрисоединенныйФайл
???
|
|
4
ChMikle
20.01.21
✎
21:31
|
Нет ни модуля, от процедуры
|
|
5
ChMikle
20.01.21
✎
21:31
|
Ни процедуры
|
|
6
hhhh
20.01.21
✎
23:53
|
(5) там просто в очередной раз все модули переименовали. Ищи глубже. Я помню нашел. Но уже не помню где.
|
|
7
kai17
21.01.21
✎
06:50
|
ПутьПоискаКартинок = "C:\tmp\images\" ;
ФайлыИзображений = НайтиФайлы(ПутьПоискаКартинок, "*"+Объект.код+"*");
Если ФайлыИзображений.Количество() Тогда
ФайлИзображения = ФайлыИзображений[0] ;
Если НЕ ФайлИзображения.ЭтоКаталог() Тогда
ДвоичныеДанные = Новый ДвоичныеДанные(ФайлИзображения.ПолноеИмя) ;
АдресВХранилище = ПоместитьВоВременноеХранилище(ДвоичныеДанные) ;
ПараметрыФайла = Новый Структура();
ПараметрыФайла.Вставить("Автор", ПараметрыСеанса.ТекущийПользователь);
ПараметрыФайла.Вставить("ВладелецФайлов", Объект.Ссылка);
ПараметрыФайла.Вставить("ИмяБезРасширения", ФайлИзображения.ИмяБезРасширения);
ПараметрыФайла.Вставить("РасширениеБезТочки", ФайлИзображения.Расширение);
ПараметрыФайла.Вставить("ВремяИзмененияУниверсальное");
ПараметрыФайла.Вставить("ГруппаФайлов");
Объект.ФайлКартинки = РаботаСФайлами.ДобавитьФайл(ПараметрыФайла, АдресВХранилище) ;
Объект.Записать();
КонецЕсли ;
КонецЕсли ;
|
|
8
ChMikle
21.01.21
✎
08:01
|
(7) через пару часов попробую, отпишусь. Спасибо большое!
|
|
9
ChMikle
21.01.21
✎
09:46
|
+(8) Еще раз спасибо , все получилось
|
|