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

ЗаписьКартнкиВНоменклатуру

Автор banditxx@rambler.ru, 14 апр 2017, 16:55

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

banditxx@rambler.ru

В справочнике Контрагентов, адреса это прямые ссылки в регистры)))

alex0402, большое спасибо за подсказку!!!

И Dethmontt, тоже Спасибо!!!

Для тех кто будет после смотреть тему: 

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

Dethmontt

Цитата: banditxx@rambler.ru от 14 апр 2017, 17:53МенеджерЗаписи.ПрисоединенныйФайл = ПрисоединенныйФайл;

Подскажите пожалуйста, это что?  Путь к файлу?

ссылка на вот этот справочник
Цитата: banditxx@rambler.ru от 14 апр 2017, 23:15КартинкаОбъект = Справочники.НоменклатураПрисоединенныеФайлы.СоздатьЭлемент();

Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Теги:
Рейтинг@Mail.ru

Поиск