Как определить что текущая запись единственная по результатам работы фильтра или запроса?
|
|
Среда, 24 Сентября 2014 г. 16:08
+ в цитатник
мне нужно определить что найденная запись единственная, которая нашлась по результат поиска. После поиска запись открывается в ленточной форме, а потом по кнопке "перейти к записи" я открываю её в форме (одностраничной, простой).
Хочу чтобы по нажатию клавиш перехода по записям появлялось сообщение о том что запись одна. При этом если записей несколько в конце и в начале списка появлялось сообщение что "достигнут конец списка в начале" или "достигнут конец списка в начале" соответственно. Мой код не совсем правильно работает.
Private Sub предыдущая_запись_кнопка_Click()
On Error GoTo MSG
Me.Recordset.MovePrevious
MSG: MsgBox "Вы находитесь в режиме просмотр одной записи (фильтр)1"
End Sub
Private Sub следующая_запись_кнопка_Click()
With Me.Recordset
.MoveNext
If Me.NewRecord Then .MovePrevious
MsgBox "Достигнут конец списка записей"
End With
On Error GoTo MSG
Me.Recordset.MovePrevious
MSG: MsgBox "Вы находитесь в режиме просмотр одной записи (фильтр)2"
End Sub
http://www.sql.ru/forum/1117392/kak-opredelit-chto-tekushhaya-zapis-edinstvennaya-po-rezultatam-raboty-filtra-ili-zaprosa
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-