Подключение к базе данных

[Orlov]

На компе установлен Access 2000
Попытка открыть новую базу и написать новый модуль
начав его с выражения
Dim base1 As DataBase (так рекомендуется в книгах)
не приводит к успеху
В предлагемом списке инструкций, который появляется после
слова "As" отсутствует инструкция DataBase
После ввода этой инструкции вручную, при компиляции возникает синтаксическая ошибка
Помогите в чем здесь секрет ?

[alibek]

Если это Access, то в редакторе VBA зайди в меню Tools - References. Если это VB, то зайди в меню Project - References. В списке найди библиотеку Microsoft DAO 3.x Library (если нужно DAO, как я понял из примера) или Microsoft ActiveX Data Object 2.x (если нужно ADO), отметь их и нажми OK. После этого повторно набери код.

[Orlov]

Спасибо большое все работает

[Orlov]

Dim wrk As Workspace
Dim my_base As Database
Dim Rst As Recordset
Dim Tab1 As String

'Set wrk = CreateWorkspace("JetWorkSpace", "Orlov", "")'
Set my_base = OpenDatabase("c:\Access\db2.mdb")
Set Rst = my_base.OpenRecordset("Names", dbOpenDynaset)

Если Set wrk закоментарено, то ругается на последнюю строку
("Type mismatch")
Если раскоментарить, то на то что эта область уже открыта
Помогите пож-та