Создание формы для поиска записи из таблицы

@woldzlo · Регистрация: 03.12.2010

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

Доброго времени суток!!! У меня такая проблема не могу создать поиск по таблице значения введенного с формы. То есть есть форма "Ведите номер КПО" там всего 1 текстовое поле и 2 кнопки, при нажатии на кнопку ок должна выводится определенная запись из таблицы. Я в коде нечего не понимаю но по менющке еще кое что смогу покликать.

@Ameli · 02.05.2012, 13:11

Пример простого поиска с использованием всего одной строки кода VBA и запроса на выборку:
Допустим, есть таблица Клиенты с полями КодКлиента, ОКПО, Наименование клиента.
-Создаем форму с полем со списком для выбора кода ОКПО, назовем его КритОКПО. В источник данных для него добавляем поля КодКлиента и ОКПО, при этом на экран выводим только ОКПО путем задания ширины полей подстановки (0см;2см). Т.о. поле со списком содержит значение кода клиента, а на экран выводится код ОКПО.
-Создаем запрос на основе таблицы Клиенты, для поля КодКлиента задаем условие отбора - равенство критерию отбора на форме. При этом, если критерий не задан: IsNull(Forms![Поиск]![КритОКПО]), то покажем все записи - "*". Т.о. условие отбора для поля КодКлиента:
Like IIf(IsNull(Forms![Поиск]![КритОКПО]);"*";Forms![Поиск]![КритОКПО])
-На форму поиска добавляем подчиненную ленточную форму на основе созданного запроса
-На событие После обновления поля со списком КритОКПО обновляем подчиненную форму:

Visual Basic

1	Me.ïîä÷èíåííàÿ_ôîðìà_Êëèåíòû.Form.Requery

@alvk · 03.05.2012, 06:42

А вот тоже самое, только без единой строчки кода и даже без использования запроса

@Ameli · 08.05.2012, 07:21

alvk, как????

@alvk · 08.05.2012, 13:47

Ameli, что как? "ловкость рук и никакого мошеннства" (c)

@woldzlo · 09.05.2012, 03:30 **[ТС]**

Всем спасибо, очень помогли!!!

Pelena · 14.05.2012, 12:30

Ameli, если alvk не придумал никаких других хитростей, то в данном случае используются свойства объекта Подчиненная форма Клиенты ОСНОВНЫЕ ПОЛЯ и ПОДЧИНЕННЫЕ ПОЛЯ.
В свойство ОСНОВНЫЕ ПОЛЯ прописывается имя поля со списком (КритОКПО), а в свойство ПОДЧИНЕННЫЕ ПОЛЯ имя поля, по которому осуществляется фильтр (КодКлиента)

13.06.2012, 15:14

Очень крутой способ, спасибо!

Подскажите пожалуйста, как еще можно реализовать фильтр по множественному выбору значений одного поля?
То есть, если нужно выбрать сразу несколько кодов ОКПО?

@Agapov_stas · 13.06.2012, 15:38

Сообщение от mpot

как еще можно реализовать фильтр по множественному выбору значений одного поля?
То есть, если нужно выбрать сразу несколько кодов ОКПО?

К примеру создать на форме список(поставив в свойствах списка Несвязное выделение - Со связным выбором) с ОКПО.
И менять источник записей в зависимости от выбранных значений в списке.

См. приложение.
Зажав Ctrl выбираешь в списке несколько ОКПО, во втором списке данные будут отфильтрованы.

13.06.2012, 17:45

Agapov_stas, нереально круто.
Огромное спасибо.

@vikroma · 21.06.2012, 11:10

Сообщение от Agapov_stas

К примеру создать на форме список(поставив в свойствах списка Несвязное выделение - Со связным выбором) с ОКПО.
И менять источник записей в зависимости от выбранных значений в списке.

Добрый день.
выбор работает только с числовым значением поля ОКПО. Можно ли сделать так, что бы ОКПО было текстовым с возможностью частичного ввода(LIKE"*ОКПО*")? Если не затруднит выложите пример.

@Agapov_stas · 21.06.2012, 15:28

Сообщение от vikroma

выбор работает только с числовым значением поля ОКПО. Можно ли сделать так, что бы ОКПО было текстовым

Да, можно.(см.вложение)

Сообщение от vikroma

с возможностью частичного ввода(LIKE"*ОКПО*")

Не понял...
ИЛИ выбирать несколько значений(хоть числовых, хоть текстовых, не важно)
ИЛИ при вводе(т.е. событие Change поля) значения в поле менять значения в списке..

Что именно?

Или Вы имеете ввиду, что:
1. Выбрать несколько значений ОКПО
2. Вводя во второе поле значение, фильтровать исходя из УЖЕ выбранных ОКПО?

@Agapov_stas · 21.06.2012, 16:13

Если все же нужно, чтобы фильтрация одновременно была(т.е. по другому полю включая выделенные ОКПО), то вот..

@vikroma · 21.06.2012, 17:47

пока не разобрал почему у меня в первом случае не выходило с текстом.
я пытаюсь вместо окпо подставить значения из другой таблицы, но мне надо чтоб выбиралось значения содержащие часть данных. если брать пример из последней программы, мне надо чтоб были все ОКПО содержащие "ук" и "е". Или "1" и "2" и "3у".
С уважением Виктор.

@Agapov_stas · 21.06.2012, 18:37

Сообщение от vikroma

мне надо чтоб были все ОКПО содержащие "ук" и "е". Или "1" и "2" и "3у".

Не знаю, зачем, но так что ли?(см.вложение)

@vikroma · 22.06.2012, 10:20

Agapov_stas, Вы гений!
именно то что надо.
у меня есть таблица с 100 000 записей и там надо находить данные с тем или иным содержанием.
при этом поиски периодические, с добавлениями. Ваш вариант самый лучший для таких поисков.
Огромное спасибо за помощь.
С уважением Виктор.

@Agapov_stas · 22.06.2012, 10:24

Сообщение от vikroma

у меня есть таблица с 100 000 записей и там надо находить данные с тем или иным содержанием.

Виктор, вероятно, что есть и лучше(быстрее по выполнению) способ.
Это был лишь вариант..

P.S. в строчке:

Visual Basic

1	a = " SELECT Таблица1.ОКПО, Таблица1.Поле1, Таблица1.Поле2 FROM Таблица1 WHERE 1=1 AND " & " " & SelToStr(Me.Список0, 0)

1=1 и AND можно убрать, лишнее..

Visual Basic

1	a = " SELECT Таблица1.ОКПО, Таблица1.Поле1, Таблица1.Поле2 FROM Таблица1 WHERE " & " " & SelToStr(Me.Список0, 0)

@paradogs · 22.08.2012, 10:37

Сообщение от alvk

А вот тоже самое, только без единой строчки кода и даже без использования запроса

Спасибо! А как организовать подобнейший же поиск, но по нескольким критериям отбора.
При чем, необходимо отображение всех записей, и при выборе параметров поиска производилась автоматическая фильтрация?
Поля поиска: Населенный пункт, цена ОТ-ДО, количество комнат ОТ - ДО

mobile · 22.08.2012, 11:22

Сообщение от paradogs

А как организовать подобнейший же поиск, но по нескольким критериям отбора.
При чем, необходимо отображение всех записей, и при выборе параметров поиска производилась автоматическая фильтрация?
Поля поиска: Населенный пункт, цена ОТ-ДО, количество комнат ОТ - ДО

Использовать удобнейший инструмент Основные поля/Подчиненные поля (LinkMaster/ChildFields) не получится, поскольку задаются интервалы. Удобно, в данном случае, сформировать динамический запрос в коде и задать его SQL-строку строку свойству RecordSource подчиненной формы.
Формирование запроса, например так

Visual Basic

dim s, p
if isnull(me.[Населенный пункт]) then p="True" else p="[Населенный пункт]='" & me.[Населенный пункт] & "'"
s="select * from Таблица " _
& " where " & p _
& " and ([Цена] between " & nz(me.[ЦенаОТ],0) & " and " & nz(me.[ЦенаДО], 9999999999)) _
& " and ([Количество комнат] between " & nz(me.[Количество комнатОТ],0) & " and " & nz(me.[Количество комнатДО],100)) 
me.МояПодчиненнаяФорма.Form.RecordSource=s

Этот код можно поместить на кнопку или на процедуру AfterUpdate каждого из контролов условий формы

Функция NZ здесь применена для выполнения условия показывать все, если какой-то параметр не выбран.
Код для населенного пункта также учитывает возможность выбрать все, если он не задан.

Имена контролов формы и полей таблицы следует исправить на истинные.

И последнее. Вместо текстового имени населенного пункта, лучше использовать его числовой код из справочника населенных пунктов. Если такого справочника нет, надо его создать. Иначе вас ждут неожиданные и трудноуловимые ошибки в разном написании одного и того же пункта

23.09.2012, 19:30

Сообщение от alvk

А вот тоже самое, только без единой строчки кода и даже без использования запроса

как реализовали без запроса?

Создание формы для поиска записи из таблицы

Решение

Решение

Решение

Решение

@woldzlo 1 / 1 / 1 Регистрация: 03.12.2010 Сообщений: 49
		1
	Создание формы для поиска записи из таблицы 01.05.2012, 21:02. Показов 73602. Ответов 76 Метки нет (Все метки) Доброго времени суток!!! У меня такая проблема не могу создать поиск по таблице значения введенного с формы. То есть есть форма "Ведите номер КПО" там всего 1 текстовое поле и 2 кнопки, при нажатии на кнопку ок должна выводится определенная запись из таблицы. Я в коде нечего не понимаю но по менющке еще кое что смогу покликать. 0

@Ameli 2095 / 1171 / 39 Регистрация: 05.11.2009 Сообщений: 1,605
	08.05.2012, 07:21	4
	alvk, как???? 1

@alvk 7446 / 4580 / 302 Регистрация: 12.08.2011 Сообщений: 14,280
	08.05.2012, 13:47	5
	Ameli, что как? "ловкость рук и никакого мошеннства" (c) 2

@woldzlo 1 / 1 / 1 Регистрация: 03.12.2010 Сообщений: 49
	09.05.2012, 03:30 [ТС]	6
	Всем спасибо, очень помогли!!! 0

Pelena 2638 / 1337 / 256 Регистрация: 25.10.2010 Сообщений: 2,196
	14.05.2012, 12:30	7
	Сообщение было отмечено как решение Решение Ameli, если alvk не придумал никаких других хитростей, то в данном случае используются свойства объекта Подчиненная форма Клиенты ОСНОВНЫЕ ПОЛЯ и ПОДЧИНЕННЫЕ ПОЛЯ. В свойство ОСНОВНЫЕ ПОЛЯ прописывается имя поля со списком (КритОКПО), а в свойство ПОДЧИНЕННЫЕ ПОЛЯ имя поля, по которому осуществляется фильтр (КодКлиента) 3

mpot
	13.06.2012, 15:14	8
	Очень крутой способ, спасибо! Подскажите пожалуйста, как еще можно реализовать фильтр по множественному выбору значений одного поля? То есть, если нужно выбрать сразу несколько кодов ОКПО?

mpot
	13.06.2012, 17:45	10
	Agapov_stas, нереально круто. Огромное спасибо.

@vikroma 0 / 0 / 0 Регистрация: 21.06.2012 Сообщений: 3
	21.06.2012, 11:10	11
	Сообщение от Agapov_stas К примеру создать на форме список(поставив в свойствах списка Несвязное выделение - *Со связным выбором) с ОКПО. И менять источник записей в зависимости от выбранных значений в списке. Добрый день. выбор работает только с числовым значением поля ОКПО. Можно ли сделать так, что бы ОКПО было текстовым с возможностью частичного ввода(LIKE"ОКПО*")? Если не затруднит выложите пример. 0

@vikroma 0 / 0 / 0 Регистрация: 21.06.2012 Сообщений: 3
	21.06.2012, 17:47	14
	пока не разобрал почему у меня в первом случае не выходило с текстом. я пытаюсь вместо окпо подставить значения из другой таблицы, но мне надо чтоб выбиралось значения содержащие часть данных. если брать пример из последней программы, мне надо чтоб были все ОКПО содержащие "ук" и "е". Или "1" и "2" и "3у". С уважением Виктор. 0

@vikroma 0 / 0 / 0 Регистрация: 21.06.2012 Сообщений: 3
	22.06.2012, 10:20	16
	Agapov_stas, Вы гений! именно то что надо. у меня есть таблица с 100 000 записей и там надо находить данные с тем или иным содержанием. при этом поиски периодические, с добавлениями. Ваш вариант самый лучший для таких поисков. Огромное спасибо за помощь. С уважением Виктор. 0

@paradogs 20 / 20 / 0 Регистрация: 22.08.2012 Сообщений: 103
	22.08.2012, 10:37	18
	Сообщение от alvk А вот тоже самое, только без единой строчки кода и даже без использования запроса Спасибо! А как организовать подобнейший же поиск, но по нескольким критериям отбора. При чем, необходимо отображение всех записей, и при выборе параметров поиска производилась автоматическая фильтрация? Поля поиска: Населенный пункт, цена ОТ-ДО, количество комнат ОТ - ДО 0

alexman
	23.09.2012, 19:30	20
	Сообщение от alvk А вот тоже самое, только без единой строчки кода и даже без использования запроса как реализовали без запроса?