Экранирование сиволов для HTML

Функция НормализованныйТекстДляHTML(Знач Текст)

  Текст = СтрЗаменить(Текст, "&", "&");
  Текст = СтрЗаменить(Текст, "<", "&lt;");
  Текст = СтрЗаменить(Текст, ">", "&gt;");
  Текст = СтрЗаменить(Текст, """", "&quot;");
  Текст = СтрЗаменить(Текст, "'", "&#39;");

  Текст = СтрЗаменить(Текст, Символы.ПС, "<br>");
  Текст = СтрЗаменить(Текст, Символы.ВК, "<br>");
  Текст = СтрЗаменить(Текст, Символы.Таб, "    ");

  Возврат Текст;

КонецФункции