Поиск по двум столбцам БД.

@Lex-A · Регистрация: 14.05.2008

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

Допустим что в *.mdb файле есть 2 столбца: Фамилия и Телефон.
А на форме(в VB)ОДНА кнопка: поиск.
Как сделать, чтобы поиск производился по двум столбцам (только одной кнопкой)?

@netfrog · 01.12.2008, 15:08

SELECT 'что_ищем' FROM имя_таблицы

@netfrog · 01.12.2008, 15:09

'SELECT 'что_ищем' FROM имя_таблицы'
или напиши подробнее, что тебе нужно

@Lex-A · 01.12.2008, 15:37 **[ТС]**

Допустим есть код:

Code
1
2
3
Data1.Recordset.FindFirst 'Author = '' _ 
& Trim(InputBox('Введите имя:')) & ''' 
If Data1.Recordset.NoMatch Then MsgBox 'Имя не найдено'

здесь поиск идет только в столбце с именем Author,
а мне надо, чтобы искал сразу в двух столбцах, например
в столбце Author и Phone.
Как это сделать?

@Lex-A · 01.12.2008, 15:38 **[ТС]**

имя таблицы ASBD

@netfrog · 01.12.2008, 16:29

Ппроще конечно (и быстрее в плане производительности) поюзать хранимый запрос и передать ему параметры, а в твоем случае можно записать введенное значение в переменную и в случае возврата 0 записей поискать в другом поле или в цикле (см код) почитать базу и вывести все значения удовлетворяющие условию (условие добавишь) туда, куда нужно:

Dim rs As Recordset
Set rs = db.OpenRecordset('ASBD')

Do Until rs.EOF = True
DebugPrint rs.Fields('имя_поля') & _
' ' & rs.Fields('имя_поля_2')
rs.MoveNext

@netfrog · 01.12.2008, 16:30

PS
чтоб корректно работал метод FindFirst укажи параметр dbOpenDynaset

@Korolana · 01.12.2008, 17:11

The best - use 'select * from <yourtable> where Author = <yourAuthor> and Phone = <yourphone>' query. If you want use FindFirst, your cursor must be dynaset- or snapshot-type Recordset.
By the way, you can use complex condition in your search criteria something like this:
strSearch = 'Author='' & <myAuthor> & '' and Phone = '' & <myPhone> & '''
rs.FindFirst strSearch

but this works much slower than query, because all operations are executed on the client computer (not on the server side).

Новые блоги и статьи Все статьи Все блоги /
1С: Программный отбор элементов справочника Номенклатура по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор под наименованию группы (на. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника Сотрудники по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .

@Lex-A 0 / 0 / 0 Регистрация: 14.05.2008 Сообщений: 15

	Поиск по двум столбцам БД. 01.12.2008, 14:55. Показов 1457. Ответов 7 Метки нет (Все метки) Допустим что в *.mdb файле есть 2 столбца: Фамилия и Телефон. А на форме(в VB)ОДНА кнопка: поиск. Как сделать, чтобы поиск производился по двум столбцам (только одной кнопкой)? 0

@netfrog 0 / 0 / 0 Регистрация: 29.09.2008 Сообщений: 18
	01.12.2008, 15:08
	SELECT 'что_ищем' FROM имя_таблицы 0

@netfrog 0 / 0 / 0 Регистрация: 29.09.2008 Сообщений: 18
	01.12.2008, 15:09
	'SELECT 'что_ищем' FROM имя_таблицы' или напиши подробнее, что тебе нужно 0

@Lex-A 0 / 0 / 0 Регистрация: 14.05.2008 Сообщений: 15
	01.12.2008, 15:38 [ТС]
	имя таблицы ASBD 0

@netfrog 0 / 0 / 0 Регистрация: 29.09.2008 Сообщений: 18
	01.12.2008, 16:29
	Ппроще конечно (и быстрее в плане производительности) поюзать хранимый запрос и передать ему параметры, а в твоем случае можно записать введенное значение в переменную и в случае возврата 0 записей поискать в другом поле или в цикле (см код) почитать базу и вывести все значения удовлетворяющие условию (условие добавишь) туда, куда нужно: Dim rs As Recordset Set rs = db.OpenRecordset('ASBD') Do Until rs.EOF = True DebugPrint rs.Fields('имя_поля') & _ ' ' & rs.Fields('имя_поля_2') rs.MoveNext 0

@netfrog 0 / 0 / 0 Регистрация: 29.09.2008 Сообщений: 18
	01.12.2008, 16:30
	PS чтоб корректно работал метод FindFirst укажи параметр dbOpenDynaset 0

@Korolana 1 / 1 / 0 Регистрация: 27.08.2008 Сообщений: 154
	01.12.2008, 17:11
	The best - use 'select * from <yourtable> where Author = <yourAuthor> and Phone = <yourphone>' query. If you want use FindFirst, your cursor must be dynaset- or snapshot-type Recordset. By the way, you can use complex condition in your search criteria something like this: strSearch = 'Author='' & <myAuthor> & '' and Phone = '' & <myPhone> & ''' rs.FindFirst strSearch but this works much slower than query, because all operations are executed on the client computer (not on the server side). 0