У меня есть база с фотками я делал раньше на фоксе прогу и у меня приравнивался табельный номер к имени фото (таб№=33)=фото(000033.bmp)
а в Комплексной автомаизации можно такое сделать же???

(0) тупая ветка,
название темы ни в кассу

как это?

в КА фото можно хранить прямо в физ лице

тебе что к чему привязывать-то надо?
уже есть база сотрудников и база фото или все с нуля заводить?

да есть базы хочется привязать по табельному тока их

можно дописать

а как это сделать не делали никто такой?

ты чего хочешь-то?
переименовать файлы?
в курсе, что файлы в 8-ке можно внутри хранить?

неть я пока тока тренеруюсь,пока лох в этом деле!!!

неть чтобы фотки брались мои изпапки с фотками

(7) нет ты первый,
задача нечеловеческой сложности:
прочитать файлик и по названию воткнуть в хранилище нужного элемента справочника

можно и так сделать, только ведь табельные все равно новые будут?

(12)->(10)

можно помоему код просто дописать где при вызове сотрудника будет браться фотка-я с одним сделал работает нормально тока не знаю как и куда это все сыпется

нет табельные жесткие как и фото

(14)Что куда сыпется???

ну когда указываешь на фото оно же потом показывается у сотрудника

пока читал тему, сломал мозг.
(17) подумай, что хочешь сделать и скажи это человеческим языком

(17)Где?

"я с одним сделал работает нормально"
Что именно сделал?

Простите не так написал наверное!Ну зашел в сотрудника,там есть рамка для фото-кликнул на нее и указал на фотку которая будет у него.И все теперь открываешь сотрудника и фотка у него есть!!!

(21)Аллилуя :)
Ну, в таком случае она хранится в каком-то реквизите с типом ХранилищеЗначений.
А теперь: что ты хочешь?

http://dll.rolmon.ru/images/s-pic/s-2.jpg

(22) теперь он хочет, чтобы они у него автоматически загрузились в справочник Сотрудники по табельному номеру

(21) не делал, но делается просто... достаточно типовой и чашки чая

чтобы у каждого сотрудника морда была там,тоесть приравнять по табельным номерам фото

номер фото совпадает с табельным номером?

иными словами есть способ автоматически узнать какому сотруднику соответствует фото?

да они равны

ветка напоминает диалог старожилов Вилабдже с Виларибой

Тогда ищи по коду и пихай в реквизит ОсновноеИзображение

       НовыйОбъект = Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();
       НовыйОбъект.ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение;
       НовыйОбъект.Хранилище = Новый ХранилищеЗначения(ВыбранноеИзображение, Новый СжатиеДанных);
       НовыйОбъект.Объект = ОбъектВладелец;
       НовыйОбъект.ИмяФайла = ПолучитьИмяФайлаИзПолногоПути(ДиалогОткрытияФайла.ПолноеИмяФайла);


(26)Не боишься? Примерно так:

СпрФЛ = Справочники.ФизическиеЛица.Выбрать();
Пока СпрФЛ.Следующий() Цикл
  ОбработкаПрерыванияПользователя();
  ПолучившеесяИзображение = СформироватьПутьКФайлуПоТабельномуНомеру;
  СжатьИзображение(ИсходноеИзображение,ПолучившеесяИзображение);
  СпрХр = СпрФЛ.ОсновноеИзображение.ПолучитьОбъект();
       ВыбранноеИзображение = Новый Картинка(ПолучившеесяИзображение, Ложь);
       СпрХр.Хранилище = Новый ХранилищеЗначения(ВыбранноеИзображение, Новый СжатиеДанных);
       СпрХр.Записать();
       Сообщить(СпрФЛ);
       
       сч=сч+1;
   КонецЦикла;

уже страшно то становится-нету ХРАНИЛИЩА ЗНАЧЕНИЙ ТУТ

(33)Хде нету?

Делал что-то... Фотки сохранены в каталоге на диске типа Иванов Иван Абрамыч.jpg
Обработка грузила их в 1ску сотруднкикам с данными ФИО.
Автор хочет тоже самое тока по табельному номеру. Так?

ДА ОНО ТАК ХАЧУУУ

(32) там не ХЗ, а ссылка на справочник ХранилищеДополнительнойИнформации

(36) ну вон в (32) примерно оно ))

(37)Эм... Но ведь всправочнике Хранилище - ХЗ :)

(38) не оно там, в (31) оно

посмотреть модуль формы элемента физлица лень, адцке лень.

Ведь подсистема изображений(файлов) задействована во множзестве объектов типовых и ее нужно знать.

Кричать и вопить оно конечно проще)

(40)Смотри внимательней - у меня тоже справочник ХранилищеДополнительнойИнформации

ААА друзья а где так оно то?? там же нет приравнивания

(43)Ты хочешь, чтобы тебе прям все от и до написали? Тебе дали два примера работы с хранилищем - разбирайся, пробуй.

(42) согласен не доглядел

файлы в каталоге ищи через НайтиФайлы по маске

catena- а это куда надо вставлять в  
Процедура ОтображениеИзображения()???

(47)Если ты разово хочешь загрузить все файлы, что есть - обработкой, если тебе надо, чтобы постоянно к новому сотру автоматом цеплялось изображение, то скорее регзаданием, например, раз в день мониторить сотрудников без изображений и цеплять к ним файлы.

нет я хачу постоянно чтобы фото болталось

(48) мне кажется, что про регл. задание было сказано зря

(49) да будет оно постоянно, после того, как загрузишь - оно в ИБ сохранится в справочнике ХранилищеДополнительнойИнформации

(49)Постоянно болталось или постоянно цеплялось?
Если ты их загрузишь, то они там и будут "болтаться".

(50)Слишком много новых слов?

А может авторь хочет чтоб фото не загружалось в 1С, а бралось по табельному номеру из определеного каталога при открытии:)
А может там тыща фоток по полгига каждая... Такие большие лица, где каждый волосок видно... или может голые во весь рост

так они что все фотки мне кажется должня просто привязываться к табельному у меня 6 гигов их

ПРАВИЛЬНО ЭТО И АЧУ ПИСАЛ ЖЕ С начала из папки брать их,они постоянно добовляются их там немерено!

(54) хахаха... я угадал
6 гигов фоток? ))

(54)Так я ж тебя спрашивала, что именно ты хочешь :) Как сказал, так и насоветовали.

(55) ну это исчо проще, правда в типовой уже будет доработка

(55)Нееет. Ты написал, что одному сотру загрузил, тебе понравилось, хочешь всем так же :)

ну да тока не сказал сколько их!

Просит неграмотного

прости

я переделаю их в jpg просто фокс не понимал этот формат тока bmp

Е.... не, ребят, пока ветку читал - сломал мозг напрочь ... у меня в итоге один вопрос к ТС - сколько сотрудников в данной базе?

2500 человек пока работающих

а если с уволеными то 3500

(63)Пофиг на формат.
Тебе примеры приводили как загрузить фотки из определенного каталога в базу 1С, найдя соответствие по табельному номеру, и постоянно хранить в базе 1С, и новые фотки тоже добавлять в базу 1С. И не важно сколько их одна или тыща - загрузить можно... только если 6 гигов фоток и они большие то нафиг это надо хранить их в базе 1С!!! ))

ну допустим 3500 фоток в формате jpg удобоваримого качества эдак 1024х768 по весу будет - 3500 х 100кб = 350 000 кб = 341 мб ... не настолько критичная прибавка к весу для базы ... а учитывая что еще раза в два меньше достаточно ... какойнить batch resize & convert и вперед как было уже описано выше

(67)Не обязательно хранить 6 гб... Я сжимаю все при загрузке, у меня максимум 10 кб на фотку :)

(69)А можно ещё фильтры какие-нибудь фотошоповские перед загрузкой применять, типа вытягиваний и размываний, и грузить смешные веселые рожицы

(70) Точно, галерею смайликов загрузить и рандомом натыкать, вес смешной, эффект максимальный :)

(66)в общем тебе тут хотят сказать, что может лучше их сжать и хранить в базе, чем постоянно ссылаться на не понятный каталог (+ не понятно, как туда фотки попадают). При этом типовой алгоритм не пострадает - тебе нужно будет лишь написать обработку и загрузить туда инфу.

Если все таки такой вариант не подходит - то тебе уже все сказали, что нужно, чтобы написать код, который при открытии справочника подгрузит фотку с жеского...

(71)О, их тогда еще можно рандомно тыкать в печать приказов... Идея на 1 апреля...

не мне так не надо тока из файла пусть берутся!А это лучше код писать вот сюдой?

Процедура ОтображениеИзображения()

   Если Хранилище.Получить() = Неопределено Тогда
       ЭлементыФормы.ПолеИзображения.Картинка = Новый Картинка();
       Возврат;
   КонецЕсли;

   Если ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение Тогда
       ЭлементыФормы.ПолеИзображения.Картинка = Хранилище.Получить();
   Иначе
       ЭлементыФормы.ПолеИзображения.Картинка = Новый Картинка();
   КонецЕсли;
   
КонецПроцедуры

Заведи женский ник, выложи фото красивой блондинки и через 5 минут тебе напишут готовую обработку.

глупо же!!!

(76) да нет как раз. само то, для жадных, ленивых, тупых 1С ников

не просто я тока пытаюсь а спросить не у кого это все

(78) не поверишь тут есть вопросы на твои ответы, учись читать

)) я хотел написать "ответы на твои вопросы"

да я нашел тока пихать куда это все думаю

(78)У тебя есть целая типовая - там дофига примеров на все случаи жизни. Правда, очень полезно один раз разобраться самому.

(82) +100500, и еще ради непонятного удовольствия не хранить фотки в базе ты хочешь внести изменения в типовую конфу  ... зря зря

(81) ну вот что написал в (74) туды и пихни

+(83) а потом придет на твое место человек и будет ломать голову нафига ради этой глупости лезли в конфу вообще

спасибо большое друзья буду тренироваться

тоже верно и обновления не сяжут!

Катя спасибо!!!Ты не с украины?

   ПутьКФото = "";
   ФайлыФото = НайтиФайлы(ПутьКФото, "*.jpg");
   
   Для каждого ОписаниеФайла Из ФайлыФото Цикл
       ФизЛицо = Справочники.ФизическиеЛица.НайтиПоКоду(ОписаниеФайла.ИмяБезРасширения);
       Если ФизЛицо.Пустая() Тогда
           Сообщить("Не найдено физ лицо " + ОписаниеФайла.ИмяБезРасширения);
       КонецЕсли;
       
       ВыбранноеИзображение = Новый Картинка(ОписаниеФайла.ПолноеИмяФайла, Ложь);
       
       Если ФизЛицо.ОсновноеИзображение.Пустая() Тогда
           ЗаписатьФизЛицо = Истина;
           ОсновноеИзображение = Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();
       Иначе
           ЗаписатьФизЛицо = Ложь;
           ОсновноеИзображение = ФизЛицо.ОсновноеИзображение.ПолучитьОбъект();
       КонецЕсли;
       ОсновноеИзображение.ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение;
       ОсновноеИзображение.Хранилище = Новый ХранилищеЗначения(ВыбранноеИзображение, Новый СжатиеДанных);
       
       ОсновноеИзображение.Объект = ФизЛицо.Ссылка;
       ОсновноеИзображение.ИмяФайла = ОписаниеФайла.Имя;
       ОсновноеИзображение.Записать();
       
       Если ЗаписатьФизЛицо Тогда
           ФизЛицоОбъект = ФизЛицо.ПолучитьОбъект();
           ФизЛицоОбъект.ОсновноеИзображение = ОсновноеИзображение.Ссылка;
           ФизЛицоОбъект.Записать();
       КонецЕсли;
   КонецЦикла;


Без загрузки

Процедура ОтображениеИзображения()
мКаталогФото = "C:\My Pictures\Sample Pictures\";
мФайлФото = мКаталогФото + "008013.jpg"; //тут таб номер
мфайл = Новый Файл(мФайлФото);
Если мфайл.Существует() Тогда
ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка(мФайлФото, Ложь);
Иначе    
ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка();
КонецЕсли;
КонецПроцедуры

(88)Упаси Бог :)

извени тогда просто по фамилии показалось

На ИТС есть статейка и есть пример конфигурации с оным извращением

(92)Ой, а где я фамилией засветилась?

(94) Алматы, Казахстан. Вот это и есть истинно украинская фамилия.

(95)Ааа... Мне с моей женской логикой эту цепочку ниасилить...

я на майл залезть хотел

Так он у меня вроде как не указан...

есть поверь мне

О как :) Я у себя мэйлов-то с фамилией и не припомню...

Значит ошибся или просто ты прикальнула на счет Литовченко

(101)Не, не мое, но ты скажи, где я такое писала, а то ж сдохну от любопытства :)

ну зашла же на майл видишь меня!!!

(103)Слушай, ты меня точно с кем-то путаешь, у меня майл с работы закрыт... Ты там с кем общаешься? :)))

ты не с Челябинска?

Азия, Казахстан, Алма-Ата5 февраля, Водолей, замужем
у тебя ребенок родился в 2007 помоему

(105)Даже не была там никогда :)

2 помоему

(106)Кроме Алматы ни одного совпадения :)

значит ошибся

{Справочник.ХранилищеДополнительнойИнформации.Форма.ФормаИзображения.Форма(17)}: Поле объекта не обнаружено (ПолеКартинки)
ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка(мФайлФото, Ложь);


Подскажите что это за ошибка!!!