Книга знаний

1С:Предприятие / Приемы программирования

Использование RegExp в 1С

Автор статьи: romix | Редакторы:
Последняя редакция №2 от 20.08.08 | История
URL: http://kb.mista.ru/article.php?id=698

Ключевые слова: RegExp, Регулярные выражения


//*******************************************
Процедура Выполнить()
    True=-1;
    False=0;
    RegExp = CreateObject("VBScript.RegExp");
    RegExp.IgnoreCase = False; //Игнорировать регистр
    RegExp.Global = True; //Поиск всех вхождений шаблона
    RegExp.Pattern = "<[^>]*>"; //Ищем теги HTML
    Matches=RegExp.Execute("Это <hr> строка <br> с тегами HTML");
    Если Matches.Count()>0 Тогда
       Для к = 0 По Matches.Count()-1 Цикл
          Match = Matches.Item(к);
          Сообщить("Найден тег:"+ Match.Value);
       КонецЦикла;
    Иначе
          Сообщить("Вхождений шаблона не найдено");
    КонецЕсли;
КонецПроцедуры

Описание | Рубрикатор | Поиск | ТелепатБот | Захваченные статьи | Установки | Форум
© Станислав Митичкин (Волшебник), 2005-2025 | Mista.ru

Яндекс.Метрика