如何用delphi的 ADO技术自动创建对.dbf文件的连接。

Question

好似vfp不支援OLE DB, 故不可用ADO

Answer 1

erickleung() 兄说得不对，你可以先用ODBC配置一个文件型的数据源，用ADO控件连接这个数据源，将ADO控件的connectionsting属性中的字符串copy下来，注意看中间有数据源路径的一段，以后只需修改数据源路径那段字符串就可以动态的连接数据源了

Answer 2

你的数据库格式可能不支持ado,先用odbc然后。

Answer 3

1.自动创建DSN(写注册表).
2.动适态设置ADO控件的connectionsting属性.
OK了。

Answer 4

to swei56(泥巴)  如何自动创建DSN，是去检测注册吗

Answer 5

delphi+sqlserver
var
  registertemp:tregistry;
  mysyspath:pchar;
begin
  registertemp:=tregistry.Create;
  with registertemp do
  begin
    try
    RootKey:=HKEY_LOCAL_MACHINE;//设置根键值为HKEY_LOCAL_MACHINE
    if Openkey('Software\ODBC\ODBC.INI\ODBC Data Sources',True) then
    begin
      WriteString('dns名','SQL Server');
    end
    else
    begin
      messagebox(application.Handle,'建数据源失败!','初始化数据源',mb_ok);
      exit;
    end;
    closekey;
    if openkey('Software\ODBC\ODBC.INI\dns名',True) then
    begin
      getmem(mysyspath,255);
      getsystemdirectory(mysyspath,255);
      WriteString('Driver',mysyspath+'\SQLSRV32.dll');
      WriteString('LastUser','数据库名');
      WriteString('Server','服务器名');
    end
    else
    begin
      messagebox(application.Handle,'建数据源失败!','初始化数据源',mb_ok);
      exit;
    end;
    closekey;
      messagebox(application.Handle,'创建数据源成功！','初始化数据源',mb_ok);
    finally
    free;
    end;
  end;
end;