Добрый день!

Прощу прощения за ещё один вопрос, но тут происходит что-то для меня совсем непонятное.

Пишу код для вставки данных в таблицу, служащую источником комбобокса.

Private Sub Список_NotInList(NewData As String, Response As Integer)
    Dim cnn As New ADODB.Connection
    Dim bytOtvet As Byte

    Dim strSQL As String
    Set cnn = CurrentProject.Connection
   
    bytOtvet = MsgBox("Ввести новые данные?", vbYesNo + vbExclamation)

    If bytOtvet = vbYes Then
        strSQL = "INSERT INTO Таблица.[Код ТТ] VALUES ('" & _
        NewData & "')"
        Debug.Print strSQL
        cnn.Execute strSQL
        Response = acDataErrAdded
    ElseIf byrResponse = vbNo Then
        Response = acDataErrContinue
        Me![Код ТТ].Undo
    End If

End Sub

Пишет ошибку, что файл "...My Documents/Таблица.mdb" не найден. Т. е. Jet или что там, работающее с SQL, видит в названии таблицы имя файла, причём прописывание строки подключения ни отдельной строкой, ни в выражении SQL дела не меняют (!!!!!!!!!). Ситуация повторяется уже во второй форме (причём в разных базах). Может, не подключена какая-то библиотека? Но какая?

Ответов нигде найти не могу, извините, если повторяюсь.