Имя: Пароль:
1C
1С v8
Картинки из хранилища УТ 11
0 Patrio_
O_Muerte
 
13.03.14
15:06
Добрый день.
Господа, подскажите каким образом выгрузить картинки из УТ 11 в папку?
Выгружать то выгружаю, но все 0-ого размера.
Что я не так делаю?
1 Ненавижу 1С
 
гуру
13.03.14
15:07
код в студию
2 Patrio_
O_Muerte
 
13.03.14
15:22
Карт = Новый Картинка(Выборка.Ссылка.ФайлКартинки.ФайлХранилище.Получить());
                                Карт.Записать(СокрЛП(Объект.Путь)+"\"+Объект.ПутьКартинки+Строка(Выборка.Ссылка.УникальныйИдентификатор())+"."+СокрЛП(Выборка.Ссылка.ФайлКартинки.Расширение));
3 Patrio_
O_Muerte
 
13.03.14
15:25
В отладчике гонял
Выборка.Ссылка.ФайлКартинки.ФайлХранилище.Получить() = Неопределено.

Может УТ где то в другом месте хранит картинки?
4 Patrio_
O_Muerte
 
13.03.14
15:25
Выборка - это перебор справочника номенклатура.
5 Ненавижу 1С
 
гуру
13.03.14
15:38
может в файлах они хранятся все таки?
6 VikingKosmo
 
13.03.14
15:43
Если речь именно об УТ 11, попробуй следующее:
ДанныеФайла = ПрисоединенныеФайлы.ПолучитьДанныеФайла(Номенклатура.ФайлКартинки);
ИмяФайла = "C:\Картинка.jpg";
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ДанныеФайла.СсылкаНаДвоичныеДанныеФайла);
Попытка
ДвоичныеДанные.Записать(ИмяФайла);
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший