Как подключить бд в АДО чтобы при запусках на других компах не выдавало ошибку пути подключения бд?

[Аватар]

Можно сделать примерно так (многоточие в конце строки надеюсь понятно что обозначает)

Const MyStroka = 'Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source=%sdb.mdb;...';
...

ADOConnection1.ConnectionString:=Format(MyStroka,[ExtractFilePath(Application.ExeName)]);
ADOConnection1.Connected:=true;