Редактирование файла file.htm лежащего на диске, добавление одной строки

1. andrey7617 56 20.11.18 16:38 Сейчас в теме
Добрый день уважаемые форумчане !!!
Прошу помощи у гуру ... не нашел примера в интернете ... (((

Допустим есть файл file.htm который лежит локально на диске на машине. Этот файл я с помощью обычного текстового отредактировал таким образом-

После строчки - td { padding: 0px; padding-left: 2px; overflow:hidden; }
Добавил строчку - td div { height: auto !important; }

и получил файл file.htm такой который мне надо ...

Понимаю что похоже это делается объектом ДокументHTML или ЗаписьHTML ... но не допер как ... (((

Приведите пожалуйста пример кода чтобы в 1с можно было прочитать файл, найти определенную строку, и вставить после нее определенную строку ...

Ну или дайте пожалуйста ссылочку на материальчик где подробно разъяснено как редактировать локальные html файл ...

Заранее огромное спасибо !!!
Вознаграждение за ответ
Показать полностью
Найденные решения
2. Timur.V 78 20.11.18 16:59 Сейчас в теме +0.4 $m
Ниже пример. Поправь в нем название переменных (называть переменные Строка - плохо) и кодировку.

Текст = Новый ТекстовыйДокумент; 
    Текст.Прочитать(ФайлДанных);    
    Для Номер = 1 По Текст.КоличествоСтрок() Цикл 
        Строка = Текст.ПолучитьСтроку(Номер);
        Если Найти(Строка, "&")<>0 Тогда
             СтрокаЗамены = СтрЗаменить(Строка, "&", "&");
             Текст.ЗаменитьСтроку(Номер,СтрокаЗамены);
        КонецЕсли;
    КонецЦикла;
Текст.Записать(ФайлДанных);
Показать


Текст.Записать(ФайлДанных,КодировкаТекста.UTF8);  // или ANSI




После строчки - td { padding: 0px; padding-left: 2px; overflow:hidden; }
Добавил строчку - td div { height: auto !important; }

Сделай через СтрЗаменить
т.е. находим строку и меняем её на две строки. Например, было А, а стало А +Б.

НаборСтрок = "Первая строка"+Символы.ПС+"Вторая строка"
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. Timur.V 78 20.11.18 16:59 Сейчас в теме +0.4 $m
Ниже пример. Поправь в нем название переменных (называть переменные Строка - плохо) и кодировку.

Текст = Новый ТекстовыйДокумент; 
    Текст.Прочитать(ФайлДанных);    
    Для Номер = 1 По Текст.КоличествоСтрок() Цикл 
        Строка = Текст.ПолучитьСтроку(Номер);
        Если Найти(Строка, "&")<>0 Тогда
             СтрокаЗамены = СтрЗаменить(Строка, "&", "&");
             Текст.ЗаменитьСтроку(Номер,СтрокаЗамены);
        КонецЕсли;
    КонецЦикла;
Текст.Записать(ФайлДанных);
Показать


Текст.Записать(ФайлДанных,КодировкаТекста.UTF8);  // или ANSI




После строчки - td { padding: 0px; padding-left: 2px; overflow:hidden; }
Добавил строчку - td div { height: auto !important; }

Сделай через СтрЗаменить
т.е. находим строку и меняем её на две строки. Например, было А, а стало А +Б.

НаборСтрок = "Первая строка"+Символы.ПС+"Вторая строка"
3. YannikAlx 43 20.11.18 17:18 Сейчас в теме +0.1 $m
Как-то так...


Файлисходный= Новый ЧтениеТекста(МойФайл.ПолноеИмя,КодировкаТекста.ANSI);
ИскомаяТекст="td { padding: 0px; padding-left: 2px; overflow:hidden; } ";
НужныйТекст=ИскомаяТекст+"
| td div { height: auto !important; } ";
ТекстФайла="";


СтрокаФайла = Файлисходный.ПрочитатьСтроку();
Если СтрокаФайла = Неопределено или СтрокаФайла = "" Тогда
СтрокаФайла = Файлисходный.ПрочитатьСтроку();
КонецЕсли;

Пока СтрокаФайла <> Неопределено Цикл


Если СтрНайти(СтрокаФайла ,ИскомаяСтрока) >0 Тогда

СтрокаФайла = СтрЗаменить(ИскомаяТекст,ИскомаяТекст,НужныйТекст);
ТекстФайла=ТекстФайла+"
|"+ СтрокаФайла ;

СтрокаФайла = Файлисходный.ПрочитатьСтроку();
КонецЦикла;
Файлисходный.Закрыть();

ФайлИзменение= Новый ЗаписьТекста;
ФайлИзменение.Открыть(МойФайл.ПолноеИмя);
ФайлИзменение.ЗаписатьСтроку(ТекстФайла);
ФайлИзменение.Закрыть();
4. andrey7617 56 20.11.18 18:10 Сейчас в теме
Timur.V Брат Ат души !!! Помогло !!! то что надо !!! Уважение !!!
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот