VB и Access

[baranich]

Код:

Dim БазаСоединение As ADODB.Connection 
Dim БазаРек As ADODB.Recordset 
Set БазаСоединение = New ADODB.Connection 
БазаСоединение.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Documents and Settings\baranova\passat_be-2000.mdb"  
БазаСоединение.Open 

На данной строке БазаСоединение.Open вылезает ошибка, в чём может быть проблема

[baranich]

Ошибка такая
Отсутствуют разрешения на использование объекта "E:\Documents and Settings\baranova\passat_be-2000.mdb".

При входе в базу, там выскакивает окошко по вводу пользвателя и пароля, но возможно из-за этого и аксес не пускает меня в бызу, хотя у меня полные права. Есть ли возможность обойти эту процедуру?

[Oldy]

User ID='Админ';Password='' - в ConnectionString

[baranich]

БазаСоединение.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Documents and Settings\baranova\passat_be-2000.mdb; User ID='developer';Password=''"
Вот так?

[Oldy]

Примерно так.

[baranich]

Ну тогда у меня выскакивает вот такая ошибка
"Не удается запустить приложение. Системная база данных отсуттствует или открыта с монопольным доступом др. пользователем"
Что теперь делать?

[Oldy]

Имя не 'developer' а 'Админ'.