|
1 |
RegExp = CreateObject("VBScript.RegExp"); // здесь под восьмерку переделай |
|
1 2 3 4 5 6 7 8 9 |
RegExp = Новый COMОбъект("VBScript.RegExp"); RegExp.IgnoreCase = Истина; //Игнорировать регистр RegExp.Global = Истина; //Поиск всех вхождений шаблона RegExp.MultiLine = Истина; //Многострочный режим RegExp.Pattern = "[^0-9]"; // отбор только чисел стр=RegExp.Replace(стр, ""); Сообщить(стр); |
About the Author
