1C: Программное прикрепление файла к документу / справочнику
Работает только на БСП 3.1 и выше
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Текст=новый ЗаписьТекста; Текст.Открыть(КаталогВременныхФайлов()+"\1.txt",КодировкаТекста.ANSI); Текст.ЗаписатьСтроку("Программируем в 1С 8.2"); Текст.Закрыть(); ИмяФайлаНаДиске = КаталогВременныхФайлов()+"\1.txt"; ДвоичныеДанные = Новый ДвоичныеДанные(ИмяФайлаНаДиске); ВременноеХранилище = ПоместитьВоВременноеХранилище(ДвоичныеДанные); // Подготоваливаем описание файла заполнив все необходимые параметры ПараметрыФайла = РаботаСФайлами.ПараметрыДобавленияФайла(); ПараметрыФайла.Автор = Пользователи.ТекущийПользователь(); ПараметрыФайла.ВладелецФайлов = док.Ссылка; ПараметрыФайла.ИмяБезРасширения = СтрЗаменить(ИмяФайлаНаДиске,".txt",""); ПараметрыФайла.РасширениеБезТочки = "txt"; // Используем функцию БСП и добавляем файл к объекту РаботаСФайлами.ДобавитьФайл(ПараметрыФайла, ВременноеХранилище); |