Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как при создании базы 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-а не судьба?


Наверх

Титульная страница Поиск, карта сайта Написать письмо