Работа с OpenRecordset - VB

Формулировка задачи:

Доброго времени суток!
возникает ошибка 3001(ошибочный аргемент):

rstTemp2 = CurrentDb.OpenRecordset( & Val & , [b]dbOpenDynaset[/b]).OpenRecordset

Но какие тут могут быть ошибочные аргументы? SQL-запрос и зарезервированное слово-параметр.
Может кто сталкивался с подобной ситуацией. Помогите, пожалуйста! Заранее благодарен!

Решение задачи: «Работа с OpenRecordset»

textual
                            Листинг программы 
                        
                            <font color="blue">Dim</font> rstTemp1 <font color="blue">As</font> DAO.Recordset