// вернёт строку, для которой все имена html тегов приведены
// к нижнему регистру.
//
// "<HTML><P Atr=""><I></i></p></htmL>" --> "<html><p Atr=""><i></i></p></html>"
//
// Параметры:
// СтрокаHTML - Строка
// Возвращаемое значение:
// - Строка -
Функция НормализоватьHTML(знач СтрокаHTML)
Перем массив, НачалоТега, символ, Позиция;
массив = Новый Массив;
массив.Добавить(">");
массив.Добавить(" ");
массив.Добавить("!");
НачалоТега = Ложь;
Для Позиция = 1 По СтрДлина(СтрокаHTML) Цикл
// ctrl+pause
ОбработкаПрерыванияПользователя();
символ = Сред(СтрокаHTML, Позиция, 1);
Если НачалоТега Тогда
Если массив.Найти(символ) = Неопределено Тогда
СтрокаHTML = Лев(СтрокаHTML, Позиция -1) + нрег(символ) + Сред(СтрокаHTML, Позиция + 1);
Продолжить;
КонецЕсли;
КонецЕсли;
НачалоТега = (символ = "<");
КонецЦикла;
Возврат СтрокаHTML;
КонецФункции
Комментарии
Отправить комментарий