做好的数据库系统，如何实现换机器后不用手动连接数据库
如题，可能表达的不是很清楚，就是说系统已经做好了，需要拿到别的机器上运行，可是需要从新手动设置数据源。

想用代码实现自动连接数据库，以求一劳永逸，但是能力有限，特来求助

[解决办法]

Delphi(Pascal) code

VarsDatabaseName,sAdoConString:String;List:Tinifile;begin   If   adoconnection1.Connected   Then        adoconnection1.Connected   := False;    Try             List:= Tinifile.Create(ExtractFilePath(Application.ExeName)+'peizhi.ini');          sDatabaseName:=list.readstring('DataSet','sDatabaseName','');          sAdoConString   :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+sDatabaseName+';Persist Security Info=False'    Finally          List.free;      End;      Try          ADOConnectionEAM.Connected   :=   True;      Except          ShowMessage('数据库连接失败，请重新配置！');          Exit;      End;end;
[解决办法]
不知道楼主问题解决没有！我再来个详细点的吧！我假设*.mdb文件和工程文件已经在同一目录下了
1.添加AdoConnection控件；
2.设置ConnectionStr属性：Build-->Microsoft Jet 4.0-->下一步，选择数据库文件--->测试连接--->成功后再把数据库前面的路径给删掉，只留下*.mdb，再测试一下，成功--->ok!

连数据库用组件就好，没必要弄代码，怪麻烦的！