ADO怎么样动态连接数据库？(急)(50分)

假设我有一个数据库文件DataFile(access格式)存放在当前目录中，我想程序一执行就监察是否正确连接上
了数据库，如否，则让人手动指定这个数据库文件，最后成功链接，应该怎么做呢？
(使用ADOconnection)

用try判断连接是否成功，不成功则让用户指定文件（通过修改连接串）。

怎么样对AdoConnection设定？

if ADOConnection.Connected then ADOConnection.Close;
ADOConnection.ConnectionString:=format('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%sDataFile.mdb;Persist Security Info=False', [ExtractFilePath(Paramstr(0))]);
ADOConnection.Open;

到http://vip.6to23.com/cooldba/software.htm去看看
或者Uses AdoEd.pas;

请问AdoEd.pas怎样使用？

var
strsource:string;
begin
adoconnection1.Close;
adoconnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=datafile;Persist Security Info=False';
try
adoconnection1.Open;
except
IF messagebox(0,'连接失败，手动连接？','错误',MB_YESNO+MB_ICONINFORMATION)=idyes then
begin
opendialog1.Filter:='*.mbb|*.mdb';
opendialog1.Execute;
strsource:=opendialog1.FileName;
adoconnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+strsource+';Persist Security Info=False';
end;
try
adoconnection1.Open;
except
// 错误处理
end;
end;

多人接受答案了。