Есть два варианта работы с текстовыми файлами в 1С:Предприятии 8.2:
- последовательный доступ к фрагментам файла, используя объекты ЗаписьТекста и ЧтениеТекста;
- вариант работы, когда текстовый файл полностью загружается в оперативную память, используя объект ТекстовыйДокумент;
Рассмотрим пример работы последовательной записи текстовый в файл и последовательное чтение из файла. Такой способ удобен для работы с файлами большого размера.В листинге 1 процедуры записи и чтения текста модуля управляемой формы 1С:Предприятия 8.2
Листинг 1 — Модуль управляемой формы:
&НаКлиенте
Процедура ЗаписатьТекст(Команда)
ПутьКФайлу = "d:\temp\";
ЗТ = Новый ЗаписьТекста(ПутьКФайлу + "rezult.txt",
КодировкаТекста.UTF8);
ЗТ.ЗаписатьСтроку("Номенклатура:");
Текст = СформироватьТекст();
ЗТ.ЗаписатьСтроку(Текст);
ЗТ.Закрыть();
КонецПроцедуры
&НаСервереБезКонтекста
Функция СформироватьТекст()
Текст="";
Выборка=Справочники.Номенклатура.Выбрать();
Пока Выборка.Следующий() Цикл
Если Выборка.ЭтоГруппа Тогда
Продолжить;
КонецЕсли;
Текст=Текст+Символы.ПС+СокрЛП(Выборка.Наименование);
КонецЦикла;
Возврат Текст;
КонецФункции
&НаКлиенте
Процедура ПрочитатьТекст(Команда)
ПутьКФайлу = "d:\temp\";
ЧТ = Новый ЧтениеТекста(ПутьКФайлу + "rezult.txt",
КодировкаТекста.UTF8);
Сообщение=Новый СообщениеПользователю;
Строка = ЧТ.ПрочитатьСтроку();
Пока Строка <> Неопределено Цикл
Сообщение.Текст=Строка;
Сообщение.Сообщить();
Строка = ЧТ.ПрочитатьСтроку();
КонецЦикла;
КонецПроцедуры