MS Access Использование значения ComboBox в поле SQL

Question

Попытка настроить запрос, когда одно из полей выбрано значением в поле со списком. Невозможно определить правильный синтаксис. Я в представлении SQL из конструктора запросов, используя следующие:

SELECT Deviations.Deviation, Deviations.Rev, Deviations.Title, Deviations.Issued, Deviations.ExpiryDate, Deviations.ExpiryHours, Deviations.ExpOther, Deviations.Active, Deviations.[Forms]![DeviationSelectionForm]![cmbAircraft] 
FROM Deviations 
WHERE Deviations.[Forms]![DeviationSelectionForm]![cmbAircraft]=True 
ORDER BY Deviations.Deviation DESC 

Поле со списком выбирает бортовой номер самолета, который является флажок в таблице. В поле флажков есть несколько номеров хвостов самолета. Так что, если бы не были выпадающей и я хотел запрос для использования в качестве примера самолета 416, запрос будет:

SELECT Deviations.Deviation, Deviations.Rev, Deviations.Title, Deviations.Issued, Deviations.ExpiryDate, Deviations.ExpiryHours, Deviations.ExpOther, Deviations.Active, Deviations.[416] 
FROM Deviations 
WHERE Deviations.[416]=True 
ORDER BY Deviations.Deviation DESC 

Когда я проверить этот запрос работает, как мне нужно, чтобы это.

Итак, вопрос в том, как создать запрос с помощью поля со списком в форме, идентифицирующей имя поля таблицы?

Answer 1

Создайте Query SQL viacode в событии combobox afterUpdate.

Dim strSql as String 
strSql = "SELECT Deviations.Deviation, Deviations.Rev, Deviations.Title, Deviations.Issued, " _ 
& "Deviations.ExpiryDate, Deviations.ExpiryHours, Deviations.ExpOther, " _ 
& "Deviations.Active, Deviations." & Me!cmbAircraft _ 
& " FROM Deviations " _ 
& "WHERE Deviations." & Me!cmbAircraft & " =True " _ 
& "ORDER BY Deviations.Deviation DESC" 
CurrentDb.QueryDefs(<yourqueryname>).SQL = strSql 

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