1С, ЗаписьТекста, ТекстовыйДокумент, текстовый файл, текст
//1
Файл = Новый ЗаписьТекста("C:\test.txt", КодировкаТекста.ANSI, Символы.ПС);
Файл.ЗаписатьСтроку("Строка2");
Файл.Записать("Строка3");
Файл.Закрыть();
//2
Текст = Новый ТекстовыйДокумент;
Текст.Прочитать("catalog.txt", КодировкаТекста.ANSI);
Текст.ЗаменитьСтроку(52, "Установка оборудования " + Стоимость);
Текст.ВставитьСтроку(53, "Замена оборудования... ");
Текст.УдалитьСтроку(10);
Текст.ДобавитьСтроку("Конец файла");
Для н = 1 По Текст.КоличествоСтрок() Цикл
стр = Текст.ПолучитьСтроку(н);
Сообщить(стр);
КонецЦикла;
Текст.Записать("catalog2.txt",КодировкаТекста.ANSI);
Текст.ТолькоПросмотр = Истина;
Текст.Показать();
Файл = Новый ЗаписьТекста("C:\test.txt", КодировкаТекста.ANSI, Символы.ПС);
Файл.ЗаписатьСтроку("Строка2");
Файл.Записать("Строка3");
Файл.Закрыть();
//2
Текст = Новый ТекстовыйДокумент;
Текст.Прочитать("catalog.txt", КодировкаТекста.ANSI);
Текст.ЗаменитьСтроку(52, "Установка оборудования " + Стоимость);
Текст.ВставитьСтроку(53, "Замена оборудования... ");
Текст.УдалитьСтроку(10);
Текст.ДобавитьСтроку("Конец файла");
Для н = 1 По Текст.КоличествоСтрок() Цикл
стр = Текст.ПолучитьСтроку(н);
Сообщить(стр);
КонецЦикла;
Текст.Записать("catalog2.txt",КодировкаТекста.ANSI);
Текст.ТолькоПросмотр = Истина;
Текст.Показать();