Имя: Пароль:
1C
1С v8
Как удалить строку из текстового файла в 8.2?
0 Kaukass
 
07.05.15
16:55
Фрагмент примера из учебника Mista:
ТекстДок = СоздатьОбъект("Текст");
ТекстДок.Открыть("catalog.txt");
ТекстДок.ЗаменитьСтроку(52, "Установка оборудования......" + Стоимость);
ТекстДок.ВставитьСтроку(53, "Замена оборудования... ");
ТекстДок.УдалитьСтроку(10);
ТекстДок.ДобавитьСтроку("Конец файла");

Перед загрузкой нужно обрабатывать банковские файлы.
В 8.2 это на пашет.
В Чтении текста метода Удалить строку нету.
1 ДенисЧ
 
07.05.15
16:55
Используй ТекстовыйДдокумент
2 Kaukass
 
07.05.15
16:57
(1) - о.к.
3 Kaukass
 
07.05.15
16:58
Из банка загружается файлик с платежками, а в нем есть строки "код=" и "код=0"  Пока их не удалишь - не загрузишь документы  в программу
4 Kaukass
 
07.05.15
16:58
Вот и извращаюсь...
5 Torquader
 
07.05.15
17:26
Самый простой способ:

Чтение=Новый ЧтениеТекста(ОбрабатываемыйФайл,...);
Запись=Новый ЗаписьТекста(ОбрабатываемыйФайл+".new",...);
Пока Истина Цикл
стр=Чтение.ПрочитатьСтроку();
Если стр=НЕОПРЕДЕЛЕНО Тогда Прервать;КонецЕсли;
Если ПроверитьСтрокуНаПравильность(стр)<>Истина Тогда Продолжить;КонецЕсли;
Запись.ЗаписатьСтроку(стр);
КонецЦикла;
Чтение.Закрыть();
Запись.Закрыть();
ПереместитьФайл(ОбрабатываемыйФайл,ОбрабатываемыйФайл+".old");
ПереместитьФайл(ОбрабатываемыйФайл+".new",ОбрабатываемыйФайл);


в функции ПроверитьСтрокуНаПравильность(стр) проверяем, оставлять строку или нет.
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший