#dynamic
Вопрос:
У меня есть таблица tblProducts, в которой перечислены продукты с их названием, категорией, размером корпуса, изображением.
Также есть 15 полей «Клиент# доступен» (да/нет) и 15 полей «Клиент# Код». (Клиент1 Доступен, Клиент2 доступен и так далее)
На frmClientSelect у меня есть cboClient, в котором перечислены 15 клиентов. Из этого выбора я могу динамически заполнять имена полей, с которыми мне нужно работать.
Dim Client As String
Dim Field1 As String
Dim Field2 As String
Client = cboClient.Value
Field1 = "Client" amp; Client amp; " Available"
Field2 = "Client" amp; Client amp; " Code"
У меня нет проблем с получением 3 вышеуказанных значений. Например, поле 1 становится доступным для клиента 2, когда в cboClient выбран 2-й клиент.
Теперь, основываясь на заданных мною полях 1 и 2, мне нужно получить отчет, в котором будут показаны продукты, в которых поле 1 = -1 (поле 1-флажки)
Приведенное ниже не распознается как инструкция SQL, и я в замешательстве.
Dim SQL As String
SQL = "SELECT tblProducts.[Product Category], tblProducts.[Product Name], tblProducts.[Case Size], tblProducts.[Product Image], tblProducts.[" amp; Field1 amp; "], tblProducts.[" amp; Field2 amp; "] FROM tblProducts WHERE (((tblProducts.[" amp; Field1 amp; "])= -1));"
Как мне отредактировать этот код и открыть rptOrderSheet с правильным набором продуктов, выбранным с помощью флажков.
Большое вам спасибо за ваш вклад!