Не удается получить каскадные комбинированные поля

Question

Я пытаюсь создать каскадные комбинированные поля, но я не могу заставить его работать. Например, если я выбираю конкретный компьютер в первом поле со списком, тогда второе поле со списком должно показывать только жесткий диск, совместимый с этим компьютером. Я также предоставил ссылку на созданную мной базу данных. Может ли кто-нибудь помочь мне с этим?

У меня есть 2 таблицы с полями:

• tblComputer (Компьютер)
• tblHDD (HDD, компьютер)

cboxComputer Row Источник: ВЫБРАТЬ tblComputer.Computer ОТ tblComputer;

cboxHDD Строка Источник: SELECT tblHDD.HDD, tblHDD.Computer FROM tblHDD;

Private Sub cboxComputer_AfterUpdate() 
    Me.cboxHDD.RowSource = "SELECT HDD " & _ 
          "FROM tblHDD " & _ 
          "WHERE Computer = " & Nz(Me.cboxComputer) & _ 
          "ORDER BY HDD" 
End Sub 

https://drive.google.com/file/d/0Bye-M8FI1tRURmQ0MEFzRjBCdWM/view?usp=sharing

Answer 1

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

Private Sub cboxComputer_AfterUpdate() 
    Me.cboxHDD.RowSource = "SELECT HDD " & _ 
         "FROM tblHDD " & _ 
         "WHERE Computer = '" & Nz(Me.cboxComputer) & "' " & _ 
         "ORDER BY HDD" 
End Sub