Метод объединения модели Jena RDF

«У меня есть два параметра в моем наборе записей, и я получал« Слишком мало параметров. Ожидаемая ошибка 2 »при использовании OpenRecordset в MS Access vba, и так я обошел его, и ИТ-РАБОТАЕТ! см. ниже подпрограмму:

'Private Sub DisplayID_Click ()

' 1. Я создал переменные для двух полей параметров xEventID и xExID, как показано ниже:

Dim db As Database
Dim rst As Recordset
Dim xEventID As Integer 
Dim xExId As Integer  

'2. Устанавливает переменные в поля параметров, как показано ниже:

Set db = CurrentDb
xEventID = Forms!frmExhibitorEntry!txtEventID
xExId = Forms!frmExhibitorEntry!subExhibitors!ExID

'3. Установите сначала OpenRecordSet и назначьте переменные переменным в предложение WHERE. Обязательно включайте все цитаты, амперсанды и пробелы точно так, как они отображаются. В противном случае код будет разрываться! Точно так, как показано ниже:

Set rst = db.OpenRecordset("SELECT tblInfo_Exhibitor.EventID,tblInfo_Display.ExID, tblMstr_DisplayItems.Display " _
& "FROM tblInfo_Exhibitor INNER JOIN (tblMstr_DisplayItems INNER JOIN tblInfo_Display ON tblMstr_DisplayItems.DisplayID = tblInfo_Display.DisplayID) ON tblInfo_Exhibitor.ExID = tblInfo_Display.ExID " _
& "WHERE (((tblInfo_Exhibitor.EventID) =" & xEventID & " ) and ((tblInfo_Exhibitor.ExID) =" & xExId & " ));")

rst.Close
Set rst = Nothing
db.Close

'End Sub