Имя: Пароль:
1C
 
Все теги заменены на спецсимволы
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);
        
        //если путь сохранения не указан зададим временный
        //записываем файл
        Текст.Записать(ДиалогФайла.ПолноеИмяФайла);
        
    КонецЕсли;
1 mTema32
 
06.07.16
17:10
До записи файла заменить спецсимволы на то, что нужно.
2 Fragster
 
гуру
06.07.16
17:33
А нафига тут вообще DOM и иже с ним????