D6操作WORD2K是不是不太灵光？如何动态设置ADO的路径？

Question

读文件
    FileIni := TIniFile.Create(ExtractFileDir(Application.ExeName)+'\cti.ini');
    Lclient_type:=FileIni.ReadString('client_database', 'type', '');
    Lclient_name:=FileIni.ReadString('client_database', 'name', '');
    Lclient_user:=FileIni.ReadString('client_database', 'user', '');
    Lclient_password:='';//CtiIni.ReadString('client_database', 'password', '');
    FileIni.Free;
设置ado
    if Lclient_type='access' then
    begin
        ADOConnection1.Connected:=False;
        ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFileDir(Application.ExeName)+'\'+Lclient_name+';Persist Security Info=False';
        ADOConnection1.Provider:='Microsoft.Jet.OLEDB.4.0';
        ADOConnection1.Connected:=true;
    end

Answer 1

ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFileDir(Application.ExeName)+'\'+Lclient_name+';Persist Security Info=False';
        ADOConnection1.Provider:='Microsoft.Jet.OLEDB.4.0';
        ADOConnection1.Connected:=true;有谁知道这部分如果用BDE 如何解决呢，谢谢，