Мой киборг-сеть программных разработок
Опубликовано Мой киборг-сеть программных разработок (https://www.mykib.org)

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

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

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

mykib.org - птн, 02/09/2016 - 10:06

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

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

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

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

Источник: https://www.mykib.org/article/ispolzovanie-regulyarnyh-vyrazheniy-vbscript-v-1s-predpriyatie-tolko-dlya-windows-den

Ссылки
[1] http://partner.mykib.org/
[2] https://www.mykib.org/tags/budni
[3] https://www.mykib.org/tags/1s-8