как выгрузить картинки?
27.04.2012
08:33
#1
"Добрый день, подскажите пожалуйста с помощью чего можно решить задачу: перенести фото сотрудников из 1С в Access? Попробывала через Excel- 1С выгрузила и сохранила, а Excel не переварил (((( Для ячеек последнего не предусмотрен тип Картинка видимо.
Выглядело это в примитиве вот так:
ТабДок = Новый ТабличныйДокумент;
Сотр=Справочники.СотрудникиОрганизаций.Выбрать();
пп=0;
Пока Сотр.Следующий() Цикл
Если Сотр.ЭтоГруппа Тогда
Продолжить;
Иначе
пп=пп+1;
ОбластьФИО="R"+Строка(пп)+"C1";
ОбластьКартинки="R"+Строка(пп)+"C20";
Секция = ТабДок.ПолучитьОбласть(ОбластьФИО);
Секция.Область(ОбластьФИО).Текст=Сотр.Физлицо.Наименование;
МояКартинка = Сотр.Физлицо.ОсновноеИзображение.Хранилище.Получить();
Если МояКартинка<>Неопределено Тогда
Рис=ТабДок.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
Индекс=ТабДок.Рисунки.Индекс(Рис);
ТабДок.Рисунки[Индекс].Картинка = МояКартинка;
ТабДок.Рисунки[Индекс].Расположить(ТабДок.Область(ОбластьКартинки));
КонецЕсли;
КонецЕсли;
КонецЦикла;
ТабДок.Записать(ИмяФайла);"
Выглядело это в примитиве вот так:
ТабДок = Новый ТабличныйДокумент;
Сотр=Справочники.СотрудникиОрганизаций.Выбрать();
пп=0;
Пока Сотр.Следующий() Цикл
Если Сотр.ЭтоГруппа Тогда
Продолжить;
Иначе
пп=пп+1;
ОбластьФИО="R"+Строка(пп)+"C1";
ОбластьКартинки="R"+Строка(пп)+"C20";
Секция = ТабДок.ПолучитьОбласть(ОбластьФИО);
Секция.Область(ОбластьФИО).Текст=Сотр.Физлицо.Наименование;
МояКартинка = Сотр.Физлицо.ОсновноеИзображение.Хранилище.Получить();
Если МояКартинка<>Неопределено Тогда
Рис=ТабДок.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
Индекс=ТабДок.Рисунки.Индекс(Рис);
ТабДок.Рисунки[Индекс].Картинка = МояКартинка;
ТабДок.Рисунки[Индекс].Расположить(ТабДок.Область(ОбластьКартинки));
КонецЕсли;
КонецЕсли;
КонецЦикла;
ТабДок.Записать(ИмяФайла);"
27.04.2012
14:23
#2
Так Вы вроде бы не в Excel, а в "табличный документ" 1С выводите.
И потом, в Access-е где хранить собираетесь?
И потом, в Access-е где хранить собираетесь?
28.04.2012
02:59
#3
В Табличном Документе 1С картинки вставляются, я это по отладчику вижу, а табличный документ я сохраняю в Excelевский файл. А в Access другие специалисты вставлять будут. Может с помощью dbf попробовать, но там тоже ничего подходящего для хранения картинок нет (((((
28.04.2012
09:33
#4
Так если есть "другие специалисты", то не проще ли определить какой-то реквизит синхронизации и просто выгрузить картинки в файлы с наименованием, отражающим этот реквизит. А уж специалисты пускай обращаются к каталогу с файлами и по имени файла сопоставляют с элементом в Access-е.
Читают тему
(гостей: 1)