Перебор записей!

@TeliS · Регистрация: 27.11.2013

Студворк — интернет-сервис помощи студентам

Имеются 2 связанные таблицы, нужно пройти ЦИКЛОМ по 1 таблице сравнивая каждую запись методом Pos() С какой нибудь переменной text и если Pos() вернет true то нужно получить все записи во 2 таблице которые относятся к записи к которой подошел text.
HELP ME PLS!

@Sergio Leone · 18.07.2014, 13:57

чем запрос с Like не устраивает?

@TeliS · 18.07.2014, 14:21 **[ТС]**

чет даже не подумал об этом =), щас попробую.
Тема остается актуальной!

Добавлено через 7 минут
тут like не подходит, т.к такой цельной записи нет именно через Pos() мне нужно =(

@Sergio Leone · 18.07.2014, 14:45

Зря поленились почитать, что такое Like и как им пользоваться!

А Вы попробуйте использовать подстановочные знаки *:

SQL
1
SELECT * FROM Table1 WHERE НужноеПоле LIKE '*ИскомыйТекст*'

@TeliS · 18.07.2014, 15:18 **[ТС]**

Искомый текст задаю не я, каким он будет я не знаю, я просто проверяю текс на наличие определенных слов и если они то есть то выдаю в ответ строку.
Пример на StringList'ах щас все работает так, но может быть огромное кол-во файлов поэтому решил переделать

Delphi
1
2
3
4
5
for i:=0 to StringList.Count-1 do
if Pos(AnsiUpperCase(текст\слово в бд),AnsiUpperCase(Текст который я не знаю))<>0 then
Создаю стринглист...
Загружаю его из файла, имя файла находиться в StringList
затем добавляю одну из строк этого файла в строку и отправляю

Добавлено через 3 минуты

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
        for i:=0 to FirstList.Count-1 do
        if Pos(AnsiUpperCase(тут парс самой строки (FirstList.Strings[i])),AnsiUpperCase(Text))<>0 then
        begin
          SecondrList:=TStringList.Create;
            AnswerList.LoadFromFile(тут парс имени файла (FirstList.Strings[i]));
            answer:=SecondrList.Strings[Random(SecondrList.Count)];
            ...
                  end;
                end;
                //--//--//--//--//--//--//--//--//--//--//--//--//--//
            end;
        end;

Добавлено через 17 минут
Никто не знает?

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

@TeliS 3 / 3 / 2 Регистрация: 27.11.2013 Сообщений: 20

	MS Access Перебор записей! 18.07.2014, 12:49. Показов 1512. Ответов 4 Метки нет (Все метки) Имеются 2 связанные таблицы, нужно пройти ЦИКЛОМ по 1 таблице сравнивая каждую запись методом Pos() С какой нибудь переменной text и если Pos() вернет true то нужно получить все записи во 2 таблице которые относятся к записи к которой подошел text. HELP ME PLS! 0

@Sergio Leone 2511 / 1132 / 582 Регистрация: 07.06.2014 Сообщений: 3,286
	18.07.2014, 13:57
	чем запрос с Like не устраивает? 0

@TeliS 3 / 3 / 2 Регистрация: 27.11.2013 Сообщений: 20
	18.07.2014, 14:21 [ТС]
	чет даже не подумал об этом =), щас попробую. Тема остается актуальной! Добавлено через 7 минут тут like не подходит, т.к такой цельной записи нет именно через Pos() мне нужно =( 0