[РЕШЕНО] Импорт фото из Active Directory 1с

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем Виктор13245234, 11 июл 2018.

  1. TopicStarter Overlay
    Виктор13245234
    Offline

    Виктор13245234 Опытный в 1С

    Регистрация:
    17 мар 2015
    Сообщения:
    239
    Симпатии:
    6
    Баллы:
    29
    Коллеги, добрый день! Есть задача: загрузить фото пользователей из Active Directory.

    не могу преобразовать в двоичные данные:

    Фото = rs.Fields("thumbnailPhoto").Value - возвращает тип COMSafeArray

    Вопрос: Как преобразовать COMSafeArray в двоичные данные, чтобы потом загрузить в 1с в реквизит? Кто сталкивался?

    Заранее спасибо!
  2. TopicStarter Overlay
    Виктор13245234
    Offline

    Виктор13245234 Опытный в 1С

    Регистрация:
    17 мар 2015
    Сообщения:
    239
    Симпатии:
    6
    Баллы:
    29
    Решил задачу через потоки. Может кому пригодится:

    Код:
    Пока НЕ Records.EOF Цикл
            Если Records.Fields("thumbnailPhoto").Value = Null Тогда           
                Возврат Неопределено;
            Иначе
                Попытка               
                    ИмяФайла     = ПолучитьИмяВременногоФайла("jpg");           
                    Поток        = Новый COMОбъект("ADODB.Stream");
                    Поток.Type   = 1;
                    Поток.Mode   = 3;
                    Поток.Open();
                    Поток.Write(Records.Fields("thumbnailPhoto").Value);
                    Поток.SaveToFile(ИмяФайла);
                    Файл         = Новый ДвоичныеДанные(ИмяФайла);
                    АдресХЗ      = ПоместитьВоВременноеХранилище(Файл, Новый УникальныйИдентификатор);
                    Поток.Close();
    
    УдалитьФайлы(ИмяФайла);
    nomad_irk нравится это.
Похожие темы
  1. Sf_by_YaphetS
    Ответов:
    0
    Просмотров:
    692
Загрузка...

Поделиться этой страницей