&НаКлиентеНаСервереБезКонтекста
Функция РазобратьТекст(ИсходныйТекст, Шаблон)
Попытка
RegExp = Новый COMОбъект(“VBScript.RegExp”);
Исключение
Возврат Новый Массив;
КонецПопытки;
RegExp.Multiline = Истина;
RegExp.Global = Истина;
RegExp.IgnoreCase = Истина;
RegExp.Pattern = Шаблон;
РезультатРазбора = RegExp.Execute(ИсходныйТекст);
Результат = Новый Массив;
Для каждого Item Из РезультатРазбора Цикл
Результат.Добавить(Item.Value);
КонецЦикла;
Возврат Результат
КонецФункции
