РазобратьТекст

&НаКлиентеНаСервереБезКонтекста
Функция РазобратьТекст(ИсходныйТекстШаблон)

Попытка
RegExp = Новый COMОбъект(«VBScript.RegExp»);
Исключение
Возврат Новый 
Массив;
КонецПопытки;

RegExp.Multiline  = Истина;
RegExp.Global     = Истина;
RegExp.IgnoreCase = Истина;
RegExp.Pattern    Шаблон;

РезультатРазбора RegExp.Execute(ИсходныйТекст);
Результат        = Новый Массив;

Для каждого Item Из РезультатРазбора Цикл
Результат.Добавить(Item.Value);
КонецЦикла;

Возврат Результат

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