СтрНайтиМежду(<СтрПараметр>, <Фрагмент1>, <Фрагмент2>, <ИсключитьФрагменты>, <БезНаложения>)
Тип: МассивСписок (ArrayList).
Метод возвращает МассивСписок (ArrayList) из строк, ограниченных параметрами Фрагмент1 и Фрагмент2.
Поиск в заданном тексте участков, ограниченных параметрами Фрагмент1 и Фрагмент2.
М = Ф.СтрНайтиМежду(Стр, "12", "90", , );
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Сообщить(""); Сообщить("=====один символ, крайние"); //один символ, крайние Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "1", "0", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "1", "0", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "1", "0", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "1", "0", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====один символ, внутренний"); //один символ, внутренний Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "3", ".", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "3", ".", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "3", ".", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "3", ".", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====два символа, крайние"); //два символа, крайние Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "12", "90", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "12", "90", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "12", "90", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "12", "90", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====два символа, внутренние"); //два символа, внутренние Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "56", "0.", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "56", "0.", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "56", "0.", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "56", "0.", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====только параметр Фрагмент1, крайний слева"); //только параметр Фрагмент1, крайний слева Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "1", , , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "1", , Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "1", , , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "1", , Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====только параметр Фрагмент1, крайний справа"); //только параметр Фрагмент1, крайний справа Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "0", , , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "0", , Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "0", , , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "0", , Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====только параметр Фрагмент2, крайний слева"); //только параметр Фрагмент2, крайний слева Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, , "1", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "1", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "1", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "1", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====только параметр Фрагмент2, крайний справа"); //только параметр Фрагмент2, крайний справа Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, , "0", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "0", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "0", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "0", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====только параметр Фрагмент1, внутренний"); //только параметр Фрагмент1, внутренний Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "4", , , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "4", , Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "4", , , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, "4", , Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Сообщить(""); Сообщить("=====только параметр Фрагмент2, внутренний"); //только параметр Фрагмент2, внутренний Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, , "4", , ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "4", Ложь, ); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "4", , Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; М = Ф.СтрНайтиМежду(Стр, , "4", Ложь, Ложь); Сообщить("М.Количество = " + М.Количество); Для А = 0 По М.Количество - 1 Цикл Сообщить("" + М.Элемент(А)); КонецЦикла; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Стр = "1234567890.1234567890.1234567890.1234567890.1234567890"; М = Ф.СтрНайтиМежду(Стр, "123", "5678", , ); Сообщить(?( М.Элемент(0) = "4" , "", "!!! ") + "ФормыДляОдноСкрипта.СтрНайтиМежду (OneScriptForms.StrFindBetween) Метод" + " " + ТекущаяДата());
ФормыДляОдноСкрипта (OneScriptForms) Класс | Библиотека OneScriptForms