0
Deahianaianyrto
06.07.16
✎
14:12
|
В итоге в файле все теги заменены на спецсимволы. Соответственно страница при просмотре пустая. Как этого избежать?
ДиалогФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
РазобранноеНаименование = Объект.Наименование;
РазобранноеНаименование = РазборНаименования(РазобранноеНаименование);
ДиалогФайла.ПолноеИмяФайла = "БизнесСправка_" + РазобранноеНаименование;
ДиалогФайла.Фильтр = "Документ HTML (*.html)|*.html";
ТипыТабДокумента = Новый Соответствие;
ТипыТабДокумента.Вставить(0, ТипФайлаТабличногоДокумента.HTML);
Если ДиалогФайла.Выбрать() Тогда
//ЗаписьHTML = Новый ЗаписьHTML;
////ЗаписьHTML = Объект.ПолеHTMLДокумента;
//ЗаписьHTML.ОткрытьФайл(ДиалогФайла.ПолноеИмяФайла);
//ЗаписьHTML.Закрыть();
ЗаписьDOM = Новый ЗаписьDOM;
ЗаписьHTML = Новый ЗаписьHTML;
ЗаписьHTML.УстановитьСтроку();
Документ = Новый ДокументHTML(Объект.ПолеHTMLДокумента);
//запись DOM ()
ЗаписьDOM.Записать(Документ, ЗаписьHTML);
HTML = ЗаписьHTML.Закрыть();
//копирование сформированного текста в текстовый документ
Текст = Новый ТекстовыйДокумент;
Текст.УстановитьТекст(HTML);
//если путь сохранения не указан зададим временный
//записываем файл
Текст.Записать(ДиалогФайла.ПолноеИмяФайла);
КонецЕсли;
|
|