动态连接ACCESS的问题

[dellxng2000]

procedure TForm1.Button3Click(Sender: TObject);
var pathstr,str:string;
begin
if opendialog1.Execute then
begin
pathstr:=opendialog1.FileName ;
Str:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+pathstr+';Persist Security Info=False';
adoconnection1.Connected:=false ;
adoconnection1.ConnectionString :='';
adoconnection1.ConnectionString :=str;
adoconnection1.Connected:=true;
end;
end;
希望能连接ACCESS数据库，但是出现错误“找不到可安装的ISAM”,是什么原因啊？着急

[qkhhxkj102]

procedure TForm1.Button1Click(Sender: TObject);
var
  pathstr:string;
  str:widestring;
begin
if opendialog1.Execute  then
  begin
    pathstr:=opendialog1.FileName ;
    str:='Provider=Microsoft.Jet.OLEDB.4.0;'
        +'Data Source='+pathstr
        +';Persist Security Info=False';

    //Str:='Provider=Microsoft.Jet.OLEDB.4.0;Data  Source='+pathstr+';Persist  Security  Info=False';
    adoconn.Connected:=false ;
    //adoconnection1.ConnectionString :='';
    adoconn.ConnectionString :=str;
    adoconn.Connected:=true;
  end;
end;

//这样试下我这能过了
//用你的在我这也出错了

[qkhhxkj102]

procedure TForm1.Button1Click(Sender: TObject);
var
  pathstr:string;
  str:widestring;
begin
if opendialog1.Execute  then
  begin
    pathstr:=opendialog1.FileName ;
    str:='Provider=Microsoft.Jet.OLEDB.4.0;'
        +'Data Source='+pathstr
        +';Persist Security Info=False';

    //Str:='Provider=Microsoft.Jet.OLEDB.4.0;Data  Source='+pathstr+';Persist  Security  Info=False';
    adoconn.Connected:=false ;
    //adoconnection1.ConnectionString :='';
    adoconn.ConnectionString :=str;
    adoconn.Connected:=true;
  end;
end;

//这样试下我这能过了
//用你的在我这也出错了

[mandarin]

可能链接字符串错了吧

[dellxng2000]

谢谢了。已经通过了。估计是字符串引用的问题。