LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Поиск дан...
 Тема: Поиск данных в форме
 
 15.06.2007 21:03:02
Roman
2 сообщения


Тема: Поиск данных в форме
Хочу обратиться к Вам с просьбой о помощи !!!
Не могли бы Вы мне помочь в Написании некоторого Кода. Хочу организовать Один поиск, но с написанием у меня проблемка. Поиск примерно такой: После нажатия кнопки появляется InputBox Куда я ввожу какие либо данные, затем данные InputBox-а ищут сравнение в таблице, если что то находит то выводит в MsgBox.
Взял даже код из одной книжки, но УВЫ !!!!

Ошибку мне посстоянно выкидывает в начале кода, ругаясь на Database в самом VBA
Просто я не понимаю как правильно его прописать в Модуле
Ещё у меня программа ругается на
1. OpenRecordset
2. NoMatch

Private Sub Кнопка1_Click()
Dim dbs As Database
Dim rstКлиент As Recordset
Dim strКарточка As String
Set dbs = CurrentDb()
Set rstКлиент = dbs.OpenRecordset ("КЛИЕНТ", dbOpenTable)
rstКлиент.Index = "PrimaryKey"
strКарточка = InputBox ("Введите № Карточки Клиента", "Поиск по Номеру Карточки")
rstКлиент.Seek "=", strКарточка
If rstКлиент.NoMatch Then
MsgBox "Номер карточки не найден!"
Exit Sub
End If
MsgBox "Результат Поиска" & "" & rstКлиент![№Карты] & ""
End Sub



P.S. Поиск в формах
Автор: Roman от 06.09.2002 15:21:05 Источник ...
 15.06.2007 21:03:03
All
4316 сообщения
1-ый


RE: Поиск данных в форме
1. Установите ссылку да DAO, т.к. в Access 2000 по умолчанию устанавливается сслыка на ADO.
2. Примеры по поиску данных есть в файле: la_find.mdb


P.S. Поиск в формах
Автор: Виктор Конюков от 0:00:00 Источник ...
 15.06.2007 21:03:03
Roman
2 сообщения


RE: Поиск данных в форме
Спасибо Виктор!!!
ЗАРАБОТАЛО !!!
Теперь остались всякие мелочи :))



P.S. Поиск в формах
Автор: Roman от 09.09.2002 11:28:36 Источник ...
 15.06.2007 21:03:03
Игорь4
26 сообщения


RE: Поиск данных в форме
Использовал пример контекстного поиска с отбором из файла la_find.mdb. Но мне еще нужно, чтобы найденную запись из подчиненной формы можно было бы удалять. Сделал кнопку удаления записи мастером, но запись не удаляется. Как быть? Помогите пожалуйста.


P.S. Поиск в формах
Автор: Игорь от 01.11.2002 15:52:16 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Поиск дан...
ПоискПоиск  Список форумовСписок форумов  
right