![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как при создании базы Access установить на неё пароль? [D7, Access]
Sergilov © (2004-12-14 20:18:00)Как при создании базы установить на неё пароль? и/или Как сменить пароль существующей базы?
Создаю её вот так :
AdoEngine:= CreateOleObject('ADOX.Catalog');
AdoEngine.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + FN + ';Jet OLEDB:Engine Type=5; User ID=; Password=;');
AdoEngine.ActiveConnection.Close;
Но если втаптать User ID и Password то выдает ошибку.
Помогите пожалусто.
palva (2004-12-16 16:59:00) [1]
{$APPTYPE CONSOLE}
uses ComObj, ActiveX, Variants;
var
DBE, NewDB: OLEVariant;
begin
CoInitialize(nil);
DBE := CreateOleObject('DAO.DBEngine.36');
NewDB := DBE.CreateDatabase('DB2000',
';LANGID=0x0419;CP=1251;COUNTRY=0;CollatingOrder=1049;pwd=YourPass');
NewDB.Close;
NewDB := Unassigned;
DBE := Unassigned;
writeln('OK');
end.
Sergilov (2004-12-14 21:47:00) [2]YurikGL - интересно. Ну допишу я то что задумал. Продам. И что мне ходить к клиенту настраивать акцес? И еще в ходе работы можно создавать несколько баз как в 1С. Каждый раз они будут звать меня?
YurikGL (2004-12-14 20:28:00) [3]А из самого Access-а не судьба?