Access работа с запароленной БД

← →
IntruderLab (2007-11-15 16:03) [0]

Вобщем - то странно - работал со многими БД, но такого не встречал. Необходимо передать данные из сетевой БД в локальную, локальная БД -Access, он запаролен стандартными средствами...
Вобщем далее код:
txtCS.Text := PromptDataSource(Self.Handle,"");
adocLocal := TADOConnection.Create(Application);
adocLocal.Connected := False;
adocLocal.ConnectionString := txtCS.Text;
adocLocal.LoginPrompt := True;
adocLocal.Connected := True;
Вобщем как обычно, но выдается ексепшн - типа доступ к БД не моноаолен, может кто сталкивался с таким?

← →
sniknik © (2007-11-15 16:20) [1]

> он запаролен стандартными средствами...
их 2 стандартных, каким?

> Вобщем далее код:
проблема вот сдесь
> txtCS.Text := PromptDataSource(Self.Handle,"");
вносится не то что нужно.

← →
IntruderLab (2007-11-15 16:21) [2]

> вносится не то что нужно.

А как, я всегда так делал?

← →
sniknik © (2007-11-15 16:27) [3]

> А как, я всегда так делал?
как положено для данного провайдера.

если вы пересели с трактора на комбайн и не нашли педали тормоза на привычном месте, что вы будете делать? возмущаться, "как же так, я всегда сюда жал", или всетаки изучите конструкцию нового для вас средства?

← →
IntruderLab (2007-11-15 16:29) [4]

короче советов нет как я понял, новых средств не вижу в данном вопросе :)

← →
IntruderLab (2007-11-15 16:42) [5]

Вобщем решил траблу, все я делал правильно, но у меня был пароль на БД, а не пользователя БД, так что разгадка в конструкции:
Provider=Microsoft.Jet.OLEDB.4.0;
User ID=Admin;
Password=Password;
Data Source=D:\Path\dbname.mdb;
Mode=ReadWrite;
Extended Properties=" " ;
Persist Security Info=False;
Jet OLEDB:System database=" " ;
Jet OLEDB:Registry Path=" " ;
Jet OLEDB:Database Password=" " ; --- Вот где была разгадка :)
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=True;
Jet OLEDB:SFP=False

sniknik - мейбы ты и это мне хотел сказать, но просьба быть доходчивее, но спасибо.... а с трактора я все таки пересел давно :)

Access работа с запароленной БД Найти похожие ветки