Если делать так:
- Код: Выделить всё
Conn.Driver :='Microsoft Access Driver (*.mdb)';
Conn.Params.Add('DBQ='+ ExtractFilePath(Application.ExeName) + 'db.mdb');
Conn.Connected :=True;
Но. Ставим на базу пароль 12345, пишем:
- Код: Выделить всё
Conn.Driver :='Microsoft Access Driver (*.mdb)';
Conn.Params.Add('DBQ='+ ExtractFilePath(Application.ExeName) + 'db.mdb');
Conn.Password := '12345';
Conn.Connected :=True;
Где грабли?