Поиск по DataGridView

@Dzhon · Регистрация: 12.03.2015

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

Подскажите пожалуйста, как реализовать поиск, в TextBox пишем что найти, в ComboBox выбираем столбец для поиска

@Dzhon · 20.01.2017, 17:48 **[ТС]**

Найдите ошибку пожалуйста

@Kulma · 20.01.2017, 19:13

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

Найдите ошибку пожалуйста

Как известном в анекдоте :" или трусы наденьте или крестик снимите"(с)
Вы для начала разберитесь , какую базу используете и что является
источником для datagridview.
У меня нет пути , как прописан у вас в строке подключения , по сему просто перенёс
БД в головную диска c:\БД.mdb.
Попробуйте , вы удивитесь происходящему )))
У вас полная каша...данные сохраняются/изменяются в базе c:\БД.mdb ,а выводятся
в грайд из БД перенесённой в проект.
Так что советую сначала упорядочить , а потом уже настраивать .

@Dzhon · 20.01.2017, 19:43 **[ТС]**

Kulma, базой данных является БД.mdb, БДDataSet.xsd создал чтобы выводить данные в DataGrid и реализовать поиск

@Kulma · 20.01.2017, 20:29

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

базой данных является БД.mdb

Вы попробуйте сделать то , что я написал - скопируйте базу в любой
другой каталог , ну например в корневой диска С.
У вас работа идёт с двумя базами - основной и её копией , привязанной к БДDataSet.xsd
В основной происходят изменения , из неё заполняется datatable , а из копии заполняется грайд
Измените путь подключения в модуле , просто измените на любой другой:
у вас перестанут заполняться комбобокс , но грайд заполнится.
При этом при нажатии кнопок Изменить или удалить , изменения произойдут в базе по
изменённому пути и не произойдут в копии.
Суть в том , что де-факто у вас две базы и код работает с двумя базами.
Пока они синхронизированы(при начальной загрузке до любых изменений) - всё худо-бедно работает,
но как только вы изменяете данные , т.е. меняете одну из схем ,синхронизация обваливается и всё перестаёт работать.

По сему приведите всё к одной базе для начала.
Например , можно отказаться от предложения "копировать Бд в проект", когда вы создаёте биндинг.

@Dzhon · 20.01.2017, 20:48 **[ТС]**

Как БД.mdb сделать основной базой?

Добавлено через 8 минут
Убрал БДDataSet.xsd , и когда включил программу то в DataGrid ничего не выводиться, выводиться начинает если добавить запись

@Kulma · 20.01.2017, 20:49

нет.
Поиск идёт по bindingSource , а вот условия поиска(combobox например) привязаны к
другому источнику, и как только в bindingSource происходят изменения
связь между схемой данных и combobox отваливается, равно как и с datatable.
Вы сделайте то , о чём я написал ранее - скопируйте базу в любое другое место и
измените путь в строке подключения -поймёте о чём я пишу.

@Dzhon · 20.01.2017, 20:57 **[ТС]**

я уже проверил то что вы писали

Добавлено через 3 минуты
Как мне переделать эту строчку для поиска

VB.NET
1
Таблица1BindingSource.Filter = "" & ComboBox1.Text & " Like '%" & TextBox1.Text & "%'"

@Kulma · 20.01.2017, 21:00

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

Как БД.mdb сделать основной базой?

Не помню точно , но подозреваю , что нужно удалить все ссылки в проекте на неё
Я бы не стал заморачиваться - удаление биндингов, xsd и ссылок занятие крайне муторное,
просто сделал бы шаблоны из форм(благо их всего две ),создал новый проект и загрузил бы в него
ранее созданные шаблоны.
Поэтому и не люблю всю эту binding-автоматизацию - неприятности вылезают совершенно в неожиданных местах.

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

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

Как мне переделать эту строчку для поиска

Переделать во что ?
Правая часть строки - это стандартная фильтрация для условия WHERE любого SELECT запроса,
т.е

SQL
1
SELECT что-то FROM из чего-то WHERE  " & ComboBox1.Text & " LIKE '%" & TextBox1.Text & "%'"

Или вы что-то другое имеете в виду ?

@Dzhon · 20.01.2017, 21:03 **[ТС]**

заменить Таблица1BindingSource

@Kulma · 20.01.2017, 21:14

Ну я вам написал запрос выше.
Подкорректируйте его под себя и поставьте
на выполнение вкупе с обновлением грайда в код обработки TextBox1_KeyUp .
Второй вариант - создаёте bindingSource (на самом деле это мощный инструмент) не в автоматическом режиме,
как это делает студия через ж**у , а вручную и там уже прописываете все соединения, привязки, фильтры и т.д.

@Dzhon · 20.01.2017, 21:24 **[ТС]**

Правильно?

VB.NET
1
2
3
4
5
6
7
    Private Sub TextBox1_KeyUp(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyUp
        SqlCom = New OleDb.OleDbCommand("SELECT * FROM [Таблица1] WHERE  " & ComboBox1.Text & " LIKE '%" & TextBox1.Text & "%'"")", Con)
        Con.Open()
        SqlCom.ExecuteNonQuery()
        Con.Close()
        Call LoadAll()
    End Sub

@Kulma · 20.01.2017, 21:47

Похоже на правду.
Ремарка : для вызова процедуры LoadAll() не нужно использовать метод вызова Call- это устаревшее из барсика.
перенесите её (процедуру LoadAll() ) в модуль и вызывайте в любом месте программы
без ссылок на класс-источник.
И ещё совет : если не планируется доступ к глобальным переменным/процедурам/функциям из вне
проекта , то лучше используйте в объявлении не Public , а Friend .
Это то же самое что и Public , только с закрытым доступом наружу, т.е. внутри проекта будет видна
везде , а снаружи (из вне программы) не подберёшься.В данном проекте не критично , но на будущее может
пригодиться.

@Dzhon · 20.01.2017, 21:57 **[ТС]**

Строка содержит синтаксическую ошибку в выражении запроса 'Фамилия LIKE '%п%'")'

@Kulma · 20.01.2017, 22:15

кавычки пересчитайте .
Если также , как постом выше , то там явно лишние присутствуют

Добавлено через 10 минут
Ссылочка вам в помощь.
Советую сохранить, там много разных решений с разными контроллами и задачами- пригодится.
Уже приводилась кем-то ранее , но наверняка незаслуженно позабыта.

@Dzhon · 20.01.2017, 22:16 **[ТС]**

убрал 2 лишние кавычки, теперь при поиске ничего не происходит

@Kulma · 20.01.2017, 22:34

посмотрел код LoadAll() - не правильно чёт мы наверетенили с заполнением грайда.
скиньте проект ещё раз -подумаю, в слепую к вечеру тяжко думается.

@Dzhon · 20.01.2017, 22:50 **[ТС]**

Вот

@Kulma · 20.01.2017, 23:10

Я разобрался вроде
вот код вставьте - работает.. после изменения тоже , после удаления не проверял , но думаю проблем не будет

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
 Private Sub TextBox1_KeyUp(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyUp
        DTF.Clear()
        SqlCom = New OleDb.OleDbCommand("SELECT * FROM [Таблица1] WHERE  " & ComboBox1.Text & " LIKE '%" & TextBox1.Text & "%'", Con)
        Con.Open()
        SqlCom.ExecuteNonQuery()
        DAF = New OleDb.OleDbDataAdapter(SqlCom)
        DAF.Fill(DTF) ' Заполняем таблицу результатми
 
        Me.DataGridView1.DataSource = DTF ' Привязываем Грид к источнику данных
        Con.Close()
        ' Call LoadAll()
        'Таблица1BindingSource.Filter = "" & ComboBox1.Text & " Like '%" & TextBox1.Text & "%'"
    End Sub

Не забудьте в модуле прописать

T-SQL
1
2
Public DTF As New Data.DataTable
    Public DAF As OleDb.OleDbDataAdapter

@Kulma · 20.01.2017, 23:24

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

@Kulma · 20.01.2017, 23:30

Поставьте предупреждение на удаление -случайное нажатие на кнопку грохнет запись и не заметите.

Новые блоги и статьи Все статьи Все блоги /
Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .

@Dzhon 1 / 1 / 0 Регистрация: 12.03.2015 Сообщений: 222

	Поиск по DataGridView 15.01.2017, 19:15. Показов 5619. Ответов 69 Метки нет (Все метки) Подскажите пожалуйста, как реализовать поиск, в TextBox пишем что найти, в ComboBox выбираем столбец для поиска 0

@Dzhon 1 / 1 / 0 Регистрация: 12.03.2015 Сообщений: 222
	20.01.2017, 19:43 [ТС]
	Kulma, базой данных является БД.mdb, БДDataSet.xsd создал чтобы выводить данные в DataGrid и реализовать поиск 0

@Dzhon 1 / 1 / 0 Регистрация: 12.03.2015 Сообщений: 222
	20.01.2017, 20:48 [ТС]
	Как БД.mdb сделать основной базой? Добавлено через 8 минут Убрал БДDataSet.xsd , и когда включил программу то в DataGrid ничего не выводиться, выводиться начинает если добавить запись 0

@Kulma 2678 / 1851 / 177 Регистрация: 25.07.2015 Сообщений: 2,983
	20.01.2017, 20:49
	нет. Поиск идёт по bindingSource , а вот условия поиска(combobox например) привязаны к другому источнику, и как только в bindingSource происходят изменения связь между схемой данных и combobox отваливается, равно как и с datatable. Вы сделайте то , о чём я написал ранее - скопируйте базу в любое другое место и измените путь в строке подключения -поймёте о чём я пишу. 0

@Dzhon 1 / 1 / 0 Регистрация: 12.03.2015 Сообщений: 222
	20.01.2017, 21:03 [ТС]
	заменить Таблица1BindingSource 0

@Kulma 2678 / 1851 / 177 Регистрация: 25.07.2015 Сообщений: 2,983
	20.01.2017, 21:14
	Ну я вам написал запрос выше. Подкорректируйте его под себя и поставьте на выполнение вкупе с обновлением грайда в код обработки TextBox1_KeyUp . Второй вариант - создаёте bindingSource (на самом деле это мощный инструмент) не в автоматическом режиме, как это делает студия через ж**у , а вручную и там уже прописываете все соединения, привязки, фильтры и т.д. 0

@Kulma 2678 / 1851 / 177 Регистрация: 25.07.2015 Сообщений: 2,983
	20.01.2017, 21:47
	Похоже на правду. Ремарка : для вызова процедуры LoadAll() не нужно использовать метод вызова Call- это устаревшее из барсика. перенесите её (процедуру LoadAll() ) в модуль и вызывайте в любом месте программы без ссылок на класс-источник. И ещё совет : если не планируется доступ к глобальным переменным/процедурам/функциям из вне проекта , то лучше используйте в объявлении не Public , а Friend . Это то же самое что и Public , только с закрытым доступом наружу, т.е. внутри проекта будет видна везде , а снаружи (из вне программы) не подберёшься.В данном проекте не критично , но на будущее может пригодиться. 0

@Dzhon 1 / 1 / 0 Регистрация: 12.03.2015 Сообщений: 222
	20.01.2017, 21:57 [ТС]
	Строка содержит синтаксическую ошибку в выражении запроса 'Фамилия LIKE '%п%'")' 0

@Kulma 2678 / 1851 / 177 Регистрация: 25.07.2015 Сообщений: 2,983
	20.01.2017, 22:15
	кавычки пересчитайте . Если также , как постом выше , то там явно лишние присутствуют Добавлено через 10 минут Ссылочка вам в помощь. Советую сохранить, там много разных решений с разными контроллами и задачами- пригодится. Уже приводилась кем-то ранее , но наверняка незаслуженно позабыта. 0

@Dzhon 1 / 1 / 0 Регистрация: 12.03.2015 Сообщений: 222
	20.01.2017, 22:16 [ТС]
	убрал 2 лишние кавычки, теперь при поиске ничего не происходит 0

@Kulma 2678 / 1851 / 177 Регистрация: 25.07.2015 Сообщений: 2,983
	20.01.2017, 22:34
	посмотрел код LoadAll() - не правильно чёт мы наверетенили с заполнением грайда. скиньте проект ещё раз -подумаю, в слепую к вечеру тяжко думается. 0

@Kulma 2678 / 1851 / 177 Регистрация: 25.07.2015 Сообщений: 2,983
	20.01.2017, 23:30
	Поставьте предупреждение на удаление -случайное нажатие на кнопку грохнет запись и не заметите. 0