通过adoconnection动态连接ACCESS问题

Question

哪位大虾来帮小弟一下
我是通过adoconnection来连接数据库的但通过以下代码连接后出现“连接失败”的
错误提示。
忘各位大虾帮帮忙
procedure TForm1.FormSshow(Sender: TObject);
 var
filename,server:string;
myfile:tinifile;
begin
    datam:=tdatam.Create(self);
   filename:=ExtractFilePath(ParamStr(0))+'datacon.ini';
    ADOConnection1.LoginPrompt :=false;
    myfile:=tinifile.create(filename);
    server:=myfile.readString('datac','server','');
    ADOConnection1.ConnectionString :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+server+';Mode=Share Deny None;Persist Security Info=false' ;
     ADOConnection1.Open;
     ADOConnection1.Connected:=true;    end;

Answer 1

procedure TForm1.FormSshow(Sender: TObject);
 var
filename,server:string;
myfile:tinifile;
begin
    datam:=tdatam.Create(self);
   filename:=ExtractFilePath(ParamStr(0))+'datacon.ini';
    ADOConnection1.LoginPrompt :=false;
    myfile:=tinifile.create(filename);
    server:=myfile.readString('datac','server','');//server串是什么样的？符合要求吗？
    ADOConnection1.ConnectionString :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+server+';Mode=Share Deny None;Persist Security Info=false' ;
     //ADOConnection1.Open;//这句加在这儿是干嘛的？
     ADOConnection1.Connected:=true;
     myfile.Free;//注意好的习惯
    end;

Answer 2

上面server:=myfile.readString('datac','server','');中第二个server是我写到ini文件中取数据库路径一个串，麻烦各位大虾解决一下。
  小弟在此不胜感激！！
   在线等待！！！！！

Answer 3

' Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+DBQ+';Jet OLEDB:Database Password=';   用这串试试看

Answer 4

你还够执着的
我问的就是
datacon.ini里
[datac]
server=???//这里是怎么写的？