Имя: Пароль:
1C
1С v8
Кто-нибудь делал привязку к фоткам???
0 pkt88
 
22.09.11
13:03
У меня есть база с фотками я делал раньше на фоксе прогу и у меня приравнивался табельный номер к имени фото (таб№=33)=фото(000033.bmp)
а в Комплексной автомаизации можно такое сделать же???
1 shuhard
 
22.09.11
13:04
(0) тупая ветка,
название темы ни в кассу
2 pkt88
 
22.09.11
13:05
как это?
3 5 Элемент
 
22.09.11
13:08
в КА фото можно хранить прямо в физ лице
4 dk
 
22.09.11
13:09
тебе что к чему привязывать-то надо?
уже есть база сотрудников и база фото или все с нуля заводить?
5 pkt88
 
22.09.11
13:10
да есть базы хочется привязать по табельному тока их
6 Stim213
 
22.09.11
13:11
можно дописать
7 pkt88
 
22.09.11
13:12
а как это сделать не делали никто такой?
8 dk
 
22.09.11
13:14
ты чего хочешь-то?
переименовать файлы?
в курсе, что файлы в 8-ке можно внутри хранить?
9 pkt88
 
22.09.11
13:15
неть я пока тока тренеруюсь,пока лох в этом деле!!!
10 pkt88
 
22.09.11
13:20
неть чтобы фотки брались мои изпапки с фотками
11 shuhard
 
22.09.11
13:22
(7) нет ты первый,
задача нечеловеческой сложности:
прочитать файлик и по названию воткнуть в хранилище нужного элемента справочника
12 dk
 
22.09.11
13:23
можно и так сделать, только ведь табельные все равно новые будут?
13 dk
 
22.09.11
13:24
(12)->(10)
14 pkt88
 
22.09.11
13:24
можно помоему код просто дописать где при вызове сотрудника будет браться фотка-я с одним сделал работает нормально тока не знаю как и куда это все сыпется
15 pkt88
 
22.09.11
13:25
нет табельные жесткие как и фото
16 catena
 
22.09.11
13:33
(14)Что куда сыпется???
17 pkt88
 
22.09.11
13:36
ну когда указываешь на фото оно же потом показывается у сотрудника
18 guitar_player
 
22.09.11
13:40
пока читал тему, сломал мозг.
(17) подумай, что хочешь сделать и скажи это человеческим языком
19 catena
 
22.09.11
13:40
(17)Где?
20 catena
 
22.09.11
13:41
"я с одним сделал работает нормально"
Что именно сделал?
21 pkt88
 
22.09.11
13:43
Простите не так написал наверное!Ну зашел в сотрудника,там есть рамка для фото-кликнул на нее и указал на фотку которая будет у него.И все теперь открываешь сотрудника и фотка у него есть!!!
22 catena
 
22.09.11
13:45
(21)Аллилуя :)
Ну, в таком случае она хранится в каком-то реквизите с типом ХранилищеЗначений.
А теперь: что ты хочешь?
23 Птах
 
22.09.11
13:46
24 guitar_player
 
22.09.11
13:48
(22) теперь он хочет, чтобы они у него автоматически загрузились в справочник Сотрудники по табельному номеру
25 guitar_player
 
22.09.11
13:48
(21) не делал, но делается просто... достаточно типовой и чашки чая
26 pkt88
 
22.09.11
13:48
чтобы у каждого сотрудника морда была там,тоесть приравнять по табельным номерам фото
27 5 Элемент
 
22.09.11
13:49
номер фото совпадает с табельным номером?
28 5 Элемент
 
22.09.11
13:50
иными словами есть способ автоматически узнать какому сотруднику соответствует фото?
29 pkt88
 
22.09.11
13:50
да они равны
30 vmv
 
22.09.11
13:51
ветка напоминает диалог старожилов Вилабдже с Виларибой
31 5 Элемент
 
22.09.11
13:52
Тогда ищи по коду и пихай в реквизит ОсновноеИзображение

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

СпрФЛ = Справочники.ФизическиеЛица.Выбрать();
Пока СпрФЛ.Следующий() Цикл
  ОбработкаПрерыванияПользователя();
  ПолучившеесяИзображение = СформироватьПутьКФайлуПоТабельномуНомеру;
  СжатьИзображение(ИсходноеИзображение,ПолучившеесяИзображение);
  СпрХр = СпрФЛ.ОсновноеИзображение.ПолучитьОбъект();
       ВыбранноеИзображение = Новый Картинка(ПолучившеесяИзображение, Ложь);
       СпрХр.Хранилище = Новый ХранилищеЗначения(ВыбранноеИзображение, Новый СжатиеДанных);
       СпрХр.Записать();
       Сообщить(СпрФЛ);
       
       сч=сч+1;
   КонецЦикла;
33 pkt88
 
22.09.11
13:53
уже страшно то становится-нету ХРАНИЛИЩА ЗНАЧЕНИЙ ТУТ
34 catena
 
22.09.11
13:53
(33)Хде нету?
35 Valerik0101
 
22.09.11
13:54
Делал что-то... Фотки сохранены в каталоге на диске типа Иванов Иван Абрамыч.jpg
Обработка грузила их в 1ску сотруднкикам с данными ФИО.
Автор хочет тоже самое тока по табельному номеру. Так?
36 pkt88
 
22.09.11
13:55
ДА ОНО ТАК ХАЧУУУ
37 5 Элемент
 
22.09.11
13:55
(32) там не ХЗ, а ссылка на справочник ХранилищеДополнительнойИнформации
38 Valerik0101
 
22.09.11
13:56
(36) ну вон в (32) примерно оно ))
39 catena
 
22.09.11
13:57
(37)Эм... Но ведь всправочнике Хранилище - ХЗ :)
40 5 Элемент
 
22.09.11
13:57
(38) не оно там, в (31) оно
41 vmv
 
22.09.11
13:59
посмотреть модуль формы элемента физлица лень, адцке лень.

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

Кричать и вопить оно конечно проще)
42 catena
 
22.09.11
13:59
(40)Смотри внимательней - у меня тоже справочник ХранилищеДополнительнойИнформации
43 pkt88
 
22.09.11
14:00
ААА друзья а где так оно то?? там же нет приравнивания
44 catena
 
22.09.11
14:01
(43)Ты хочешь, чтобы тебе прям все от и до написали? Тебе дали два примера работы с хранилищем - разбирайся, пробуй.
45 5 Элемент
 
22.09.11
14:02
(42) согласен не доглядел
46 guitar_player
 
22.09.11
14:02
файлы в каталоге ищи через НайтиФайлы по маске
47 pkt88
 
22.09.11
14:12
catena- а это куда надо вставлять в  
Процедура ОтображениеИзображения()???
48 catena
 
22.09.11
14:15
(47)Если ты разово хочешь загрузить все файлы, что есть - обработкой, если тебе надо, чтобы постоянно к новому сотру автоматом цеплялось изображение, то скорее регзаданием, например, раз в день мониторить сотрудников без изображений и цеплять к ним файлы.
49 pkt88
 
22.09.11
14:16
нет я хачу постоянно чтобы фото болталось
50 guitar_player
 
22.09.11
14:16
(48) мне кажется, что про регл. задание было сказано зря
51 guitar_player
 
22.09.11
14:16
(49) да будет оно постоянно, после того, как загрузишь - оно в ИБ сохранится в справочнике ХранилищеДополнительнойИнформации
52 catena
 
22.09.11
14:18
(49)Постоянно болталось или постоянно цеплялось?
Если ты их загрузишь, то они там и будут "болтаться".

(50)Слишком много новых слов?
53 Valerik0101
 
22.09.11
14:19
А может авторь хочет чтоб фото не загружалось в 1С, а бралось по табельному номеру из определеного каталога при открытии:)
А может там тыща фоток по полгига каждая... Такие большие лица, где каждый волосок видно... или может голые во весь рост
54 pkt88
 
22.09.11
14:19
так они что все фотки мне кажется должня просто привязываться к табельному у меня 6 гигов их
55 pkt88
 
22.09.11
14:20
ПРАВИЛЬНО ЭТО И АЧУ ПИСАЛ ЖЕ С начала из папки брать их,они постоянно добовляются их там немерено!
56 Valerik0101
 
22.09.11
14:21
(54) хахаха... я угадал
6 гигов фоток? ))
57 catena
 
22.09.11
14:21
(54)Так я ж тебя спрашивала, что именно ты хочешь :) Как сказал, так и насоветовали.
58 guitar_player
 
22.09.11
14:22
(55) ну это исчо проще, правда в типовой уже будет доработка
59 catena
 
22.09.11
14:22
(55)Нееет. Ты написал, что одному сотру загрузил, тебе понравилось, хочешь всем так же :)
60 pkt88
 
22.09.11
14:24
ну да тока не сказал сколько их!
61 pkt88
 
22.09.11
14:24
Просит неграмотного
62 pkt88
 
22.09.11
14:24
прости
63 pkt88
 
22.09.11
14:25
я переделаю их в jpg просто фокс не понимал этот формат тока bmp
64 ParaWiz
 
22.09.11
14:26
Е.... не, ребят, пока ветку читал - сломал мозг напрочь ... у меня в итоге один вопрос к ТС - сколько сотрудников в данной базе?
65 pkt88
 
22.09.11
14:27
2500 человек пока работающих
66 pkt88
 
22.09.11
14:27
а если с уволеными то 3500
67 Valerik0101
 
22.09.11
14:28
(63)Пофиг на формат.
Тебе примеры приводили как загрузить фотки из определенного каталога в базу 1С, найдя соответствие по табельному номеру, и постоянно хранить в базе 1С, и новые фотки тоже добавлять в базу 1С. И не важно сколько их одна или тыща - загрузить можно... только если 6 гигов фоток и они большие то нафиг это надо хранить их в базе 1С!!! ))
68 ParaWiz
 
22.09.11
14:32
ну допустим 3500 фоток в формате jpg удобоваримого качества эдак 1024х768 по весу будет - 3500 х 100кб = 350 000 кб = 341 мб ... не настолько критичная прибавка к весу для базы ... а учитывая что еще раза в два меньше достаточно ... какойнить batch resize & convert и вперед как было уже описано выше
69 catena
 
22.09.11
14:34
(67)Не обязательно хранить 6 гб... Я сжимаю все при загрузке, у меня максимум 10 кб на фотку :)
70 Valerik0101
 
22.09.11
14:37
(69)А можно ещё фильтры какие-нибудь фотошоповские перед загрузкой применять, типа вытягиваний и размываний, и грузить смешные веселые рожицы
71 ParaWiz
 
22.09.11
14:38
(70) Точно, галерею смайликов загрузить и рандомом натыкать, вес смешной, эффект максимальный :)
72 guitar_player
 
22.09.11
14:41
(66)в общем тебе тут хотят сказать, что может лучше их сжать и хранить в базе, чем постоянно ссылаться на не понятный каталог (+ не понятно, как туда фотки попадают). При этом типовой алгоритм не пострадает - тебе нужно будет лишь написать обработку и загрузить туда инфу.

Если все таки такой вариант не подходит - то тебе уже все сказали, что нужно, чтобы написать код, который при открытии справочника подгрузит фотку с жеского...
73 catena
 
22.09.11
14:44
(71)О, их тогда еще можно рандомно тыкать в печать приказов... Идея на 1 апреля...
74 pkt88
 
22.09.11
14:46
не мне так не надо тока из файла пусть берутся!А это лучше код писать вот сюдой?

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

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

   Если ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение Тогда
       ЭлементыФормы.ПолеИзображения.Картинка = Хранилище.Получить();
   Иначе
       ЭлементыФормы.ПолеИзображения.Картинка = Новый Картинка();
   КонецЕсли;
   
КонецПроцедуры
75 5 Элемент
 
22.09.11
14:57
Заведи женский ник, выложи фото красивой блондинки и через 5 минут тебе напишут готовую обработку.
76 pkt88
 
22.09.11
14:58
глупо же!!!
77 guitar_player
 
22.09.11
14:59
(76) да нет как раз. само то, для жадных, ленивых, тупых 1С ников
78 pkt88
 
22.09.11
15:00
не просто я тока пытаюсь а спросить не у кого это все
79 5 Элемент
 
22.09.11
15:02
(78) не поверишь тут есть вопросы на твои ответы, учись читать
80 5 Элемент
 
22.09.11
15:03
)) я хотел написать "ответы на твои вопросы"
81 pkt88
 
22.09.11
15:03
да я нашел тока пихать куда это все думаю
82 catena
 
22.09.11
15:03
(78)У тебя есть целая типовая - там дофига примеров на все случаи жизни. Правда, очень полезно один раз разобраться самому.
83 ParaWiz
 
22.09.11
15:04
(82) +100500, и еще ради непонятного удовольствия не хранить фотки в базе ты хочешь внести изменения в типовую конфу  ... зря зря
84 Valerik0101
 
22.09.11
15:05
(81) ну вот что написал в (74) туды и пихни
85 ParaWiz
 
22.09.11
15:05
+(83) а потом придет на твое место человек и будет ломать голову нафига ради этой глупости лезли в конфу вообще
86 pkt88
 
22.09.11
15:05
спасибо большое друзья буду тренироваться
87 pkt88
 
22.09.11
15:06
тоже верно и обновления не сяжут!
88 pkt88
 
22.09.11
15:08
Катя спасибо!!!Ты не с украины?
89 5 Элемент
 
22.09.11
15:15
   ПутьКФото = "";
   ФайлыФото = НайтиФайлы(ПутьКФото, "*.jpg");
   
   Для каждого ОписаниеФайла Из ФайлыФото Цикл
       ФизЛицо = Справочники.ФизическиеЛица.НайтиПоКоду(ОписаниеФайла.ИмяБезРасширения);
       Если ФизЛицо.Пустая() Тогда
           Сообщить("Не найдено физ лицо " + ОписаниеФайла.ИмяБезРасширения);
       КонецЕсли;
       
       ВыбранноеИзображение = Новый Картинка(ОписаниеФайла.ПолноеИмяФайла, Ложь);
       
       Если ФизЛицо.ОсновноеИзображение.Пустая() Тогда
           ЗаписатьФизЛицо = Истина;
           ОсновноеИзображение = Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();
       Иначе
           ЗаписатьФизЛицо = Ложь;
           ОсновноеИзображение = ФизЛицо.ОсновноеИзображение.ПолучитьОбъект();
       КонецЕсли;
       ОсновноеИзображение.ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение;
       ОсновноеИзображение.Хранилище = Новый ХранилищеЗначения(ВыбранноеИзображение, Новый СжатиеДанных);
       
       ОсновноеИзображение.Объект = ФизЛицо.Ссылка;
       ОсновноеИзображение.ИмяФайла = ОписаниеФайла.Имя;
       ОсновноеИзображение.Записать();
       
       Если ЗаписатьФизЛицо Тогда
           ФизЛицоОбъект = ФизЛицо.ПолучитьОбъект();
           ФизЛицоОбъект.ОсновноеИзображение = ОсновноеИзображение.Ссылка;
           ФизЛицоОбъект.Записать();
       КонецЕсли;
   КонецЦикла;
90 Valerik0101
 
22.09.11
15:17
Без загрузки

Процедура ОтображениеИзображения()
мКаталогФото = "C:\My Pictures\Sample Pictures\";
мФайлФото = мКаталогФото + "008013.jpg"; //тут таб номер
мфайл = Новый Файл(мФайлФото);
Если мфайл.Существует() Тогда
ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка(мФайлФото, Ложь);
Иначе    
ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка();
КонецЕсли;
КонецПроцедуры
91 catena
 
22.09.11
15:20
(88)Упаси Бог :)
92 pkt88
 
22.09.11
15:21
извени тогда просто по фамилии показалось
93 Vladal
 
22.09.11
15:25
На ИТС есть статейка и есть пример конфигурации с оным извращением
94 catena
 
22.09.11
15:25
(92)Ой, а где я фамилией засветилась?
95 Vladal
 
22.09.11
15:26
(94) Алматы, Казахстан. Вот это и есть истинно украинская фамилия.
96 catena
 
22.09.11
15:28
(95)Ааа... Мне с моей женской логикой эту цепочку ниасилить...
97 pkt88
 
22.09.11
15:29
я на майл залезть хотел
98 catena
 
22.09.11
15:30
Так он у меня вроде как не указан...
99 pkt88
 
22.09.11
15:32
есть поверь мне
100 catena
 
22.09.11
15:34
О как :) Я у себя мэйлов-то с фамилией и не припомню...
101 pkt88
 
22.09.11
15:37
Значит ошибся или просто ты прикальнула на счет Литовченко
102 catena
 
22.09.11
15:41
(101)Не, не мое, но ты скажи, где я такое писала, а то ж сдохну от любопытства :)
103 pkt88
 
22.09.11
15:44
ну зашла же на майл видишь меня!!!
104 catena
 
22.09.11
15:55
(103)Слушай, ты меня точно с кем-то путаешь, у меня майл с работы закрыт... Ты там с кем общаешься? :)))
105 pkt88
 
22.09.11
15:56
ты не с Челябинска?
106 pkt88
 
22.09.11
15:57
Азия, Казахстан, Алма-Ата5 февраля, Водолей, замужем
у тебя ребенок родился в 2007 помоему
107 catena
 
22.09.11
15:57
(105)Даже не была там никогда :)
108 pkt88
 
22.09.11
15:57
2 помоему
109 catena
 
22.09.11
15:57
(106)Кроме Алматы ни одного совпадения :)
110 pkt88
 
22.09.11
15:57
значит ошибся
111 pkt88
 
28.09.11
09:49
{Справочник.ХранилищеДополнительнойИнформации.Форма.ФормаИзображения.Форма(17)}: Поле объекта не обнаружено (ПолеКартинки)
ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка(мФайлФото, Ложь);


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