用delphi将oracle数据导出DBF的格式，怎么做？

Question

用delphi将oracle数据导出dbf的格式，怎么做？
最好有代码例子

Answer 1

两个方法,
1. 用TBatchMove,很简单用bde连oracle,用bde连本地数据库(设目标路径及TableType为ttFoxPro)或用odbc for foxpro,然后用TBatchMove就可以了,程序就一句:
  BatchMove1.Execute;
2.用ado连输出dbf的目录,连接串为:
Provider=Microsoft.Jet.OLEDB.4.0;Password="";Data Source=d:\temp;Extended Properties=dbase 5.0;Persist Security Info=True
然后用一TQuery,程序为:
   with   ADOQuery1 do
   begin
      sql.Text:='SELECT * into 输出表  FROM 源表 IN [ODBC][ODBC;Driver={Microsoft ODBC for Oracle};UID=用户名;PWD=口令;SERVER=oracle别名;]';
      execsql;   end;