Есть форма, на ней размещены 2 комбобокса и 1 подчиненная форма.

Нужно при выборе из комбобоксов получать соответствующую информацию в подчиненной форме. Сейчас получаю инфу при выборе соответствующей комбинации значений комбобоксов из одного кортежа.

Re: Формы: как связать 2 комбобокса с одной подчиненной формой? я тут попытался что то написать

Option Compare Database
Option Explicit

Sub cboCompanyName_AfterUpdate()
Dim strCNRecord As String
strCNRecord = "SELECT * FROM qryContact " _
& " WHERE CompanyName = " _
& Me!cboCompanyName & ""
Me.RecordSource = strCNRecord
End Sub

Sub cboLastName_AfterUpdate()
Dim strLNRecord As String
strLNRecord = "SELECT * FROM qryContact " _
& " WHERE LastName = " _
& Me!cboLastName & ""
Me.RecordSource = strLNRecord
End Sub

ошибку не выдает, но при этом работает только первый комбобокс (cboCompanyName), при выборе значения из второго комбобокса (cboLastName) подчиненная форма обновляется (заметно как она "моргнула"), но не обновляется. То есть связь с первым комбобоксом не разрывается.

Re[1]: Формы: как связать 2 комбобокса с одной подчиненной формой? Меняйте и эти значения.
В первом случае:
LinkMasterFields="cboCompanyName"
LinkChildFields="CompanyName"
или вообще не пользуйтесь ими, если этими комбобоксами однозначно будут определены данные в подчиненной форме

Re[1]: Формы: как связать 2 комбобокса с одной подчиненной формой? База у меня не качается почему-то.
Если подчиненная таблица зависит от двух полей, то, наверное, имеет смысл описать LinkMasterField и LinkChildFields так, как Вы описали, а на события AfterUpdate обоих комбобосков повесить код:
forms![главная форма]![имя контрола подчиненной формы].form.recordsource=forms![главная форма]![имя контрола подчиненной формы].form.recordsource
Если это не поможет, то можно попытаться так:
LinkMasterField и LinkChildFields очистить
на afterupdate комбобоксов:
forms![главная форма]![имя контрола подчиненной формы].form.recordsource="sELECT * FROM таблица WHERE [поле,связанное с 1 комбобоксом] = " & me![комбобокс1] & " AND [поле,связанное с 2 комбобоксом] = " & me![комбобокс2]
Только не надо забывать, что, если комбобоксы содержат текстовую информацию, то данные в запросе надо заключать в кавычки

Re[1]: Формы: как связать 2 комбобокса с одной подчиненной формой? поправленная процедурка. Заметьте, что я переименовал контрол подчиненной формы. Он теперь называется "fsubContact1". Чтобы access не путался на что именно ссылаюсь.

Public Sub FilterfsubContact()
If IsNull(Me![cboCompanyName]) = True And IsNull(Me![cboLastName]) = True Then
Me.fsubContact1.Form.RecordSource = "SELECT * FROM qryContact;"
Exit Sub
End If
If IsNull(Me![cboCompanyName]) = True Or IsNull(Me![cboLastName]) = True Then
MsgBox "Не заполнены необходимые данные"
Exit Sub
End If
Me.fsubContact1.Form.RecordSource = "SELECT * FROM qryContact WHERE [CompanyName] = " & Me![cboCompanyName] & " AND [LastName] =" & Me![cboLastName] & ";"
End Sub

Re[1]: Формы: как связать 2 комбобокса с одной подчиненной формой? "If IsNull(Me![cboCompanyName]) = True And IsNull(Me![cboLastName]) = True" эта проверка сделана для того, чтобы выдавать хоть что-то в подчинённой форме. С таким же успехом можно было обнулить RecordSource при данном условии. Что, по-Вашему, должно выводиться в подчиненной форме, когда данные на условия не заполнены? Это во-первых.
Во-вторых, осуществление поиска "по обрывочным сведениям" - это большая процедура. Алгоритм я вижу примерно такой. При заполнении одного из комбобоксов, процедура проверяет наложено ли уже условие по данным этого комбобокса. Если да, то удаляет старое условие и добавляет новое. Если нет, то просто добавляет новое. Если комбобокс очищается, то удалет условие, наложенное этим комбобоксом. В приницпе ничего сложного, но кода получается порядочно, так как проверок много. У меня в какой-то базе есть что-то похожее, если интересует, то я поищу

Re[1]: Формы: как связать 2 комбобокса с одной подчиненной формой? отправил

Re[1]: Формы: как связать 2 комбобокса с одной подчиненной формой? Извините, все перепутал :( можно еще разок на merseed@gmail.com