Как в одной форме вывести данные из двух таблиц по связующему полю.

[Znaharkms]

Всем здравствуйте! Помогите пожалуйста.
Есть две таблицы "Мотор на северном" и "ТС" (каталог транспортных средств), как сделать так чтобы Данные об автомобиле сами подставлялись в форму по связующему полю "Гос номер".

[Aleksandr H.]

попробуйте вариант

Private Sub Гос_номер_AfterUpdate()
    Dim rst As Recordset
    Dim SQL As String
    Me.Список304.Requery
    SQL = "SELECT [Марка ТС], [Год выпуска], [VIN номер], [ФИО владельца]" & _
          " FROM ТС WHERE [Гос номер]=""" & Me![Гос номер] & """"
    Set rst = CurrentDb.OpenRecordset(SQL)
    If rst.RecordCount = 1 Then
        Me![Марка ТС_ТС] = rst.Fields(0)
        Me![Год выпуска] = rst.Fields(1)
        Me![VIN номер] = rst.Fields(2)
        Me!Поле345 = rst.Fields(3)
    End If
    Set rst = Nothing
End Sub

[Znaharkms]

Спасибо, что помогли.
А куда вставить эти строки, я в этом полный ноль)

[Znaharkms]

Как я понял, это надо вставить в События ->после обновления поля гос номер. Если это так, то ничего не произошло. Записи меняются, но они не связаны между собой полями "гос номер"

[Aleksandr H.]

Так

Сообщение от Znaharkms

Записи меняются,

или же

Сообщение от Znaharkms

ничего не произошло.

Сообщение от Znaharkms

они не связаны между собой полями "гос номер"

Объясните детальнее что под этим подразумеваете.

[Znaharkms]

Сообщение от Aleksandr H.

Так или же


Объясните детальнее что под этим подразумеваете.

Получается так, что записи из двух таблиц меняются по порядку, т.е. первая запись из первой таблицы и первая запись из второй таблицы и т.д. Связи по полю "Гос номер" нет.

[Znaharkms]

Сейчас попытался внести новые данные, но не смог внести данные в поля, которые принадлежат таблице "ТС". Видимо нет связи, а как ее установить?

[shanemac51]

вы задали один и тот же вопрос на 3-х форумах
вы не запутаетесь в ответах?

[Znaharkms]

Дв я уже не знаю кого мне спросить, чтоб помогли