|
Преобразовать Табличный документ в HTML текст с тегами
| ☑ |
0
VAVANSTR
12.04.18
✎
18:18
|
Долго мучился с преобразованием Табличного документа в HTML текст с тегами, и вот что-то получилось...
Может кто-то предложит способ получше?
ТабличныйДокумент = Выборка.Ссылка.ПолучитьОбъект().ПечатьДИ(НомерСтрокиСотрудника);
КонецЕсли;
ВременныйФайл = Новый Файл(КаталогВременныхФайлов()+
"Должностная инструкция по сотруднику " + СокрЛП(Выборка.Сотрудник) + " на " + СокрЛП(Формат(ТекущаяДата(), "ДФ=dd-MM-yyyy")) + ".html");
ТабличныйДокумент.Записать(ВременныйФайл.ПолноеИмя, ТипФайлаТабличногоДокумента.HTML);
ФайлВХранилище = Новый ХранилищеЗначения(Новый ДвоичныеДанные(ВременныйФайл.ПолноеИмя), Новый СжатиеДанных(9));
ЧтениеHTML = Новый ЧтениеHTML;
ЧтениеHTML.ОткрытьФайл(ВременныйФайл.ПолноеИмя,"UTF-8");
ПостроительDOM = Новый ПостроительDOM;
ДокументHTML = ПостроительDOM.Прочитать(ЧтениеHTML);
//Теперь собственно вывод на форму
ЗаписьDOM = Новый ЗаписьDOM;
ЗаписьHTML = Новый ЗаписьHTML;
ЗаписьHTML.УстановитьСтроку();
ЗаписьDOM.Записать(ДокументHTML,ЗаписьHTML);
ПолеХТМЛ = СокрЛП(ЗаписьHTML.Закрыть());
|
|
1
Вафель
12.04.18
✎
18:20
|
табДок.Записать(ИмяФайла, Тип.ХТМЛ)
|
|
2
VAVANSTR
12.04.18
✎
18:20
|
ФайлВХранилище можно удалить
|
|
3
Вафель
12.04.18
✎
18:21
|
ну и строку прочитать - это достаточно ЧтениеТекста
|
|
4
VAVANSTR
12.04.18
✎
18:22
|
(1) ТабличныйДокумент.Записать(ВременныйФайл.ПолноеИмя, ТипФайлаТабличногоДокумента.HTML); - Это есть у меня там (3) Тогда теги не сохраняются, а удаляются
|
|
5
Вафель
12.04.18
✎
18:24
|
у тебя внутри таблички тэги?
|
|
6
Chameleon1980
12.04.18
✎
18:33
|
:)
|
|
7
VAVANSTR
13.04.18
✎
14:52
|
(5) Нет. Мне нужно сохранить табличный документ в формате HTML, и тот текст что получился в формате HTML нужно отправить во внешний сервис, чтобы там они его могли открыть как HTML документ, но мне не надо его пересылать в виде файла, а надо именно как HTML-текст переслать.
|
|