Использование регулярных выражений VBScript в 1С Предприятие (только для Windows). День тринадцатый

Аватар пользователя mykib.org

На сайте инфостарт я вступил в дискуссию по поводу приведения строки в число - поэтому и решил написать эту маленькую "шпору" программисту...

Допустим, пользователь мог ввести номер телефона в виде "8 (123) 456-789-10-11 доб.555" или еще как-то. Мы хотим получить только цифры.

Вот небольшой код

 
    RegExp = Новый COMОбъект("VBScript.RegExp");
    RegExp.IgnoreCase = Истина; //Игнорировать регистр 
    RegExp.Global = Истина; //Поиск всех вхождений шаблона 
    RegExp.MultiLine = Истина; //Многострочный режим 
    RegExp.Pattern = "[^0-9]"; // отбор только чисел
    
    //здесь может быть цикл
    ТелефонИсправленный = RegExp.Replace(Телефон, "");
    //
Ключевые фразы:

Добавить комментарий

CAPTCHA
Этот вопрос для того, чтобы удостовериться действительно ли Вы являетесь человеком и для предотвращения спама.
3 + 1 =
Решите эту простую математическую задачу и введите результат. Например, для 1+3, введите 4.