Помогите с recordset! - VB

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

Открываю recordset по всем правилам. В нем должно быть несколько полей, а получается только одно!!!! Уже голову сломал.....
код:

dim rst as DAO.Recordset

dim strSQL as String

strSQL = "SELECT table.Name FROM table WHERE ID > 3"
set str = CurrentDB.OpenRecordset(strSQL, dbOpenDynaset)
Debug.Prinr rst.Recordset
set rst = Nothing

srcm
Результат Debug.Prinr rst.Recordset всегда =1

Решение задачи: «Помогите с recordset!»

textual
                            Листинг программы 
                        
                            SELECT table.Name FROM table WHERE ID > 3