ADO - Access

← →
Ruf (2003-01-04 11:23) [0]

База запаролена Access-ом, пароль знаю, но никак не могу открыть ее. Ошибка "Монопольное использование...". Получается если mdb закрыт Access-ом, то его нельзя открыть? Если да, то как?

← →
sniknik © (2003-01-04 12:12) [1]

добавить в строку коннекта
Jet OLEDB:Database Password=???

← →
Ruf (2003-01-04 12:35) [2]

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\open\pass\db2.mdb;Persist Security Info=False;Jet OLEDB:Database Password=awed

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

← →
Ruf (2003-01-04 12:37) [3]

Та же база, но без пароля, работает прекрасно

← →
sniknik © (2003-01-04 13:25) [4]

с паролем тоже должна.

пароль наложен на базу?(должно работать как написано) группу или юзера?

← →
Набережных С. (2003-01-04 13:50) [5]

Попробуй задать строку коннекта программно.
const ConnectString:WideString = "Provider=Microsoft.Jet.OLEDB.4.0;" +"User ID=%s;Data Source=%s;" +"Mode=Share Deny Read|Share Deny Write;" +"Persist Security Info=True;Jet OLEDB:System database="";" +"Jet OLEDB:Registry Path="";" +"Jet OLEDB:Database Password="%s";" +"Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;" +"Jet OLEDB:Global Partial Bulk Ops=2;" +"Jet OLEDB:Global Bulk Transactions=1;" +"Jet OLEDB:New Database Password="";" +"Jet OLEDB:Create System Database=False;" +"Jet OLEDB:Encrypt Database=False;" +"Jet OLEDB:Don""t Copy Locale on Compact=False;" +"Jet OLEDB:Compact Without Replica Repair=False;" +"Jet OLEDB:SFP=False"; ADOConnection1.ConnectionString:=Format(ConnectString,["Admin","D:\open\pass\db2.mdb","awed",1]);

← →
Набережных С. (2003-01-04 13:59) [6]

Поправочка
ADOConnection1.ConnectionString:=Format(ConnectString,["Admin","D:\open\pass\db2.mdb","awed"]);

ADO - Access Найти похожие ветки