Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 15:02

Алгоритм загрузки изображений из excel по ссылке URL в реквизит основное изображение

Автор nikioioio, 23 мар 2016, 05:43

0 Пользователей и 1 гость просматривают эту тему.

nikioioio

Добрый день. Есть стандартная обработка "ЗагрузкаДанныхИзТабличногоДокумента" В событии при записи описан алгоритм:

НомерСтолбцаИзображение = 3;
НомерСтолбцаОписаниеИзображение = 4;


ЗапросСуществующих = Новый Запрос();
ЗапросСуществующих.Текст = "
|ВЫБРАТЬ
|   ХранилищеДополнительнойИнформации.Ссылка
|ИЗ
|   Справочник.ХранилищеДополнительнойИнформации КАК ХранилищеДополнительнойИнформации
|ГДЕ
|   ХранилищеДополнительнойИнформации.Объект = &Объект
|   И ХранилищеДополнительнойИнформации.Наименование = &Наименование";

Объект.Записать();

ФайлКартинки = Новый Файл(СокрЛП(ТекстыЯчеек[НомерСтолбцаИзображение]));
Предупреждение(ФайлКартинки.Существует());
Если ФайлКартинки.Существует() Тогда
   Предупреждение("!");
   ЗапросСуществующих.УстановитьПараметр("Объект", Объект.Ссылка);
   ЗапросСуществующих.УстановитьПараметр("Наименование", СокрЛП(ТекстыЯчеек[НомерСтолбцаОписаниеИзображение]));
   Выборка = ЗапросСуществующих.Выполнить().Выбрать();
   Если Выборка.Количество() <= 0 Тогда
      Предупреждение("!!");
      ХранилищеОбъект = Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();
      ХранилищеОбъект.ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение;
      ХранилищеОбъект.Хранилище = Новый ХранилищеЗначения(Новый Картинка(ТекстыЯчеек[НомерСтолбцаИзображение]),Новый СжатиеДанных);
      ХранилищеОбъект.Объект = Объект.Ссылка;
      ХранилищеОбъект.Наименование = СокрЛП(ТекстыЯчеек[НомерСтолбцаОписаниеИзображение]);
      ХранилищеОбъект.ИмяФайла = ТекстыЯчеек[НомерСтолбцаИзображение];
      ХранилищеОбъект.Записать();
      Объект.ОсновноеИзображение=ХранилищеОбъект.Ссылка;
   КонецЕсли;
КонецЕсли;


Помогите переделать алгоритм так, чтобы принимались URL Ссылки вместо локальных ссылок типа C:\...

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск