Проблемы с привязкой подчиненной формы к комбинированному списку в главной форме
На форме в ADP для доступа есть несвязанный комбинированный список, в котором отображается список компаний (отображается имя, поле идентификатора - это поле). Когда компания выбрана, я хочу отобразить информацию о подписке в подчиненной форме (источником данных, для которого является представление companySubscription) для этой компании. Я устанавливаю ссылку Master Fields и связывает дочернее свойство Fields подчиненной формы с companyId. По сути, я настроил это так.
Теоретически, я думаю, это будет означать, что когда я изменяю значение в выпадающем списке, подчиненная форма должна показывать информацию о подписке для этой компании. Однако он не работает - подчиненная форма всегда отображает все данные в представлении companySubscription, независимо от того, для чего задан комбинированный список.
Помогите!
1 ответ
Нашел ответ - был какой-то код из другого проекта, который помог:
Private Sub cmbSub_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[subID] = " & str(Nz(Me![cmbSub], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
И пришлось изменить его для ADP (спасибо этому посту!)
Private Sub ChooseCo_AfterUpdate()
' Find the record that matches the control.
Dim rs As ADODB.Recordset
Set rs = Me.Recordset.Clone
rs.Find "[companyId] = " & Str(Nz(Me![ChooseCo], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub