ник: KOHCEPBATOP
Для удобства перемещения по записям в форме добавил выпадающий список со значением поля ToolTypeDescr в алфавитном порядке. Подразумевается, что при выборе в этом списке нужного элемента, текущей записью в форме должна стать запись, содержащая выбранное значение (уникальное).
В обработчик списка накидал такой код:
Dim sQuery As String
Dim dbs As Database
Dim rst As Recordset
Set dbs = CurrentDb()
sQuery = "SELECT * FROM ToolTypes WHERE ToolTypes!ToolTypeDescr=""" + ToolTypeDescrList.Value + """"
Set rst = dbs.OpenRecordset(sQuery)
If (rst!ToolTypeDescr = ToolTypeDescrList.Value) Then
DoCmd.GoToRecord acForm, "ToolList", acGoTo, NNNN
End If
rst.Close
dbs.Close
|
Не понятно что вместо NNNN ставить. В свойствах Recordset не нашел как узнать какой записи соответствует текущая позиция в Recordset .
Или это как то по другому решается?
P.S.
Access 2003