Как создать набор записей из оператора SELECT (ошибка: элемент не найден в коллекции)

Question

Я пытаюсь открыть RecodSet с помощью инструкции SELECT, но получаю следующее сообщение об ошибке: Ошибка выполнения 3265 Элемент не найден в коллекции .

Я выполняюэтот код для события lostFocus из поля в форме Access 2007.

Вот мой код:

    Dim myDB As Database
    Dim myREC As DAO.Recordset
    Dim strRegionsMsg, boolRegionMsg
    Dim strQuery
    Set myDB = CurrentDb

    strQuery = "Select * FROM RTA;"
    Set myREC = myDB!Execute(strQuery)
    'Set myREC = myDB!Recordsets(strQuery)

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

Я что-то здесь упускаю?

Answer 1

Попробуйте это:

Dim myDB As Database
Dim myREC As DAO.Recordset
Dim strRegionsMsg, boolRegionMsg
Dim strQuery
Set myDB = CurrentDb

strQuery = "Select * FROM [RTA]"
Set myREC = myDB.OpenRecordset(strQuery)