Delphi环境将DBF记录导入MS Access提示文件名错误的问题求解

• 语法结构错误：当前代码拼接的SQL语句[ database = '+ipo+' ].tab1完全不被Access的Jet/ACE数据库引擎支持，引擎无法识别这种自定义的外部文件关联写法，直接判定文件名非法抛出报错。
• 参数使用错误：Access引擎关联DBF文件的逻辑是按目录关联DBF驱动，每个独立的.dbf文件对应目录下的一张表，不需要也不支持把完整的.dbf文件全路径作为数据库参数传入。代码中虽然提前通过ExtractFileDir提取了DBF所在的目录路径，但拼接SQL时完全没有使用该变量，反而把带具体文件名的全路径传入了非法语法块。
• 逻辑漏洞：当前代码把SQL执行语句放在了文件选择判断分支的外面，哪怕用户没选中任何DBF文件，程序也会直接执行空参数的SQL语句，触发额外报错。

• 修正SQL语法：Access引擎关联外部DBF文件的标准写法是通过IN子句指定DBF文件所在的目录路径，配合对应版本的dBase/FoxPro ISAM驱动标识，引擎会自动加载目录下和表名匹配的.dbf文件。
• 调整代码执行逻辑：把SQL执行逻辑移动到文件选择成功的判断分支内，使用提前提取的目录路径拼接合法SQL，不需要传入具体的.dbf文件名。

修正后的核心代码参考：

procedure TForm1.Button1Click(Sender: TObject);
var 
  importdir: string;
begin
  // 仅在用户成功选中DBF文件后执行导入流程
  if OpenDialog1.Execute then
  begin
    // 提取选中DBF文件的所在目录
    importdir := ExtractFileDir(OpenDialog1.FileName);
    Edit1.Text := importdir;
    // 拼接符合Access引擎规范的导入SQL
    ADOConnection1.Execute(
      'INSERT INTO tab2 SELECT * FROM tab1 IN "' + importdir + '" [dBase IV;]'
    );
    ShowMessage('导入完成');
  end;
end;

• 若源DBF是FoxPro格式（带备注字段、索引文件），需要把驱动标识[dBase IV;]替换为对应版本的[FoxPro 3.0;]等标识，避免字段读取异常。
• 路径参数必须用双引号包裹，哪怕目录路径包含空格，也不会被引擎错误截断解析。
• 若运行时提示“找不到可安装的ISAM”，需要检查Delphi程序的编译位数和本机安装的Access Database Engine位数保持一致（32位程序对应32位驱动，64位程序对应64位驱动）。

内容的提问来源于stack exchange，提问作者zaoui34