Результат по запросу

[Magikan]

Народ, помогите советом. Я сделал запрос, результат которого передается в отчет, который соответственно выскакивает сразу на экран. Как мне сделать чтобы при отрицательном результате по запросу, т.е. при отсутствии искомой записи в базе, на экран выводилось что-то типа «Данная запись в базе отсутствует!». Что нужно писать и где?

[Dzhon]

Проверь рекордсет и если записи нет выведи MsgBox.
Это в общих чертах, а если конкретней тогда "код в студию..."

[Magikan]

А можно поподробнее? Где проверяется рекордсет?

[GSerg]

Для начала, где он образуется...

[Konst_One]

в коде отчета или формы

Код: Выделить всё

if rs.EOF or rs.BOF then

     Msgbox "Empty!"

end if


[Magikan]

Все оказалось оччь просто, в коде отчета на событие "Отсутствие данных" сделал запись:

Private Sub Report_NoData(Cancel As Integer)

MsgBox "Карточка с указанным серийным номером отсутствует!!!", vbExclamation + vbOKOnly, "Внимание!!!"
Cancel = -1

End Sub

Все заработало как надо: если запись в базе отсутствует, пустой отчет на экран не выводится, а выходит окно сообщения.

[Dzhon]

Так ты в акцесе шарил что-ли
Или это DataReport