Для тех, кому лень качать (набрано за 10-15 минут):
Функция ПолучитьHTMLТаблицыЗначений(ТЗ)
Перем Ответ, мИменаКолонок, КолонкаТЗ, СтрокаТЗ;
Ответ = "<TABLE><TBODY><TR>";
мИменаКолонок = новый Массив;
Для каждого КолонкаТЗ из ТЗ.Колонки Цикл
мИменаКолонок.Добавить(КолонкаТЗ.Имя);
Ответ = Ответ + "<TH>" + ?(ПустаяСтрока(КолонкаТЗ.Заголовок), КолонкаТЗ.Имя, КолонкаТЗ.Заголовок)+"</TH>";
КонецЦикла;
Для каждого СтрокаТЗ из ТЗ Цикл
Ответ = Ответ + "</TR><TR>";
Для каждого КолонкаТЗ из мИменаКолонок Цикл
Ответ = Ответ + "<TD>" + Строка(СтрокаТЗ[КолонкаТЗ]) + "</TD>";
КонецЦикла;
КонецЦикла;
Ответ = Ответ + "</TR></TBODY></TABLE>";
Возврат Ответ;
КонецФункции
Показать