S
SeverBap
Код:
ИмяВременногоФайла = ПолучитьИмяВременногоФайла();
Соединение = Новый HTTPСоединение("www.nbrb.by");
Попытка
Соединение.Получить("statistics/Rates/RatesPrint.asp?fromDate="+Формат(ТекущаяДата(),"ДФ=yyyy-MM-dd"),ИмяВременногоФайла);
Соединение=Неопределено;
Исключение
Соединение=Неопределено;
КонецПопытки;
НоваяТаб=Новый ТаблицаЗначений();
НоваяТаб.Колонки.Добавить("Код");
НоваяТаб.Колонки.Добавить("Наименование");
НоваяТаб.Колонки.Добавить("Курс");
ЧтениеHTML = Новый ЧтениеHTML;
ЧтениеHTML.ОткрытьФайл(ИмяВременногоФайла);
ПостроительDOM = Новый ПостроительDOM;
ДокументDOM = ПостроительDOM.Прочитать(ЧтениеHTML);
СписокTr=ДокументDOM.ПолучитьЭлементыПоИмени("tr");
Для Каждого Tr Из СписокTr Цикл
Попытка
НоваяСтрока=НоваяТаб.Добавить();
НоваяСтрока.Код=СокрЛП(Tr.ДочерниеУзлы[0].ТекстовоеСодержимое);
НоваяСтрока.Наименование=СокрЛП(Tr.ДочерниеУзлы[1].ТекстовоеСодержимое);
НоваяСтрока.Курс=СокрЛП(Tr.ДочерниеУзлы[2].ТекстовоеСодержимое);
Исключение
КонецПопытки;
КонецЦикла;
что там с кодировкой не так?