Имеется форма созданная по запросу. Запрос вида [введите бла бла бла]. Необходимо, что бы при вводе значения которого нет в таблицы, сама форма с данными не открывалась, а появлялось окно с сообщением "По данному запросу ничего не найдено, хотите продолжить поиск?" И 2 кнопки -ДА ( при нажатие на неё форма открывалась бы заного, тобишь опять [введите бла бла бла]), -НЕТ(закрылось бы это всплывшее окно с вопросом). Как это сделать?
Заранее благодарен.
Надо проверить запрос (обрабатывается событие "после изменения" поля Поиск). Например, так
Dim ID ID=Dlookup("ID","Таблица1","Поле1='" & Me.Поиск.Value & "'")
IF Nz(ID,0) = 0 Then If Msgbox("По данному запросу ничего не найдено, хотите продолжить поиск?" , vbYesNo + vbExclamation) = vbNo Then ... End If End if