photos/83/999/87947/821713_740x550.jpg
photos/83/999/87947/821712_740x550.jpg
photos/83/999/87947/821711_740x550.jpg
photos/83/999/87947/821710_740x550.jpg
photos/83/999/87947/821709_740x550.jpg
photos/83/999/87947/821708_740x550.jpg
photos/83/15/88868/829347_740x550.jpg
photos/83/15/88868/829346_740x550.jpg
photos/83/15/88868/829345_740x550.jpg
photos/83/15/88868/829344_740x550.jpg
цель перебрать строки со сравнением (жирным отмечено) части строк, если найдено сходство отмечаем строку маркером добавляем в начало определённый символ и переходим к поиску следующего сходства и при 4ёх совпадениях останавливаемся, и проверяем сходство по следующему индексу - photos/83/999/87947/ индексов от 0 до 88868.
ну должно получиться так
* photos/83/999/87947/821713_740x550.jpg
* photos/83/999/87947/821712_740x550.jpg
* photos/83/999/87947/821711_740x550.jpg
* photos/83/999/87947/821710_740x550.jpg
photos/83/999/87947/821709_740x550.jpg
photos/83/999/87947/821708_740x550.jpg
* photos/83/15/88868/829347_740x550.jpg
* photos/83/15/88868/829346_740x550.jpg
* photos/83/15/88868/829345_740x550.jpg
* photos/83/15/88868/829344_740x550.jpg
я записал маску обрезав строку
- Код: Выделить всё
Dim str1 As String
Dim str2 As String
str1 = "photos/83/15/88868/829338_740x550.jpg" 'ну сюда мы отправляем строку из текст. документа
str2 = Regex.Match(str1, "(photos/\d+/\d+/\d+/)", RegexOptions.IgnoreCase).Value 'photos/83/15/88868/ - результат для сравнения
понимаю что надо условие проверки кинуть в цикл от 1 до 4, а его в свою очередь поместить в цикл от 0 до 88868
у меня проблема с не пониманием как организовать проверку ?
тут ещё один момент photos/83- здесь может быть 4 значения 100, 83, 71, 12 а
в этом регистре photos/83/15 - от 0 до 9999 как бы упростить задачу, без перебора всех вариантов, да и ещё как правило похожие идут последовательно может как то метить строки вроде первые четыре пометили и переходим к следующей не похожей строке сразу метим её и три последующих и повторяем до конца документа