如何将几个dbf --->合并为一个access(mdb)呢？？？

chenfeng3000 2003-10-28 08:25:42

如 fox1.dbf ,fox2.dbf , fox3.dbf
怎样将上述的几个dbf表，生成一个access库，如myaccess.mdb
fox1.dbf-->table1
fox2.dbf-->table2
fox3.dbf-->table3
问题在于，如何能将任意几个dbf 合并为一个access库，不是特殊的指定的dbf向access转换，谁有好法子阿？？？

...全文

189 11 打赏收藏转发到动态举报

写回复

用AI写文章

11 条回复

切换为时间正序

请发表友善的回复…

发表回复

wbryfl 2003-11-18

打赏
举报

加一句，记不太清是不是playicq.com上有TDBF下载，你也可以到www.51delphi.com等网站看看，或者，给我个邮件，我给你发一个，wbryfl@163.net

wbryfl 2003-11-18

打赏
举报

晕呀，你可以直接使用Access直接将DBF文件导入，或者，如果你在程序里做的话，可以用ADO连接access数据库，用TDBF控件连接DBF数据库就可以做到了。TDBF控件你可以到www.playicq.com下。

gsdragon 2003-11-18

打赏
举报

你一个个导入不使吗

chenfeng3000 2003-11-18

打赏
举报

能不能写出完整的代码阿，我还是弄不出来啊，呜呜！

chenfeng3000 2003-11-18

打赏
举报

chenfeng3000 2003-10-28

打赏
举报

还有么？？

fhuibo 2003-10-28

打赏
举报

用SQL SERVER 提供的TDS包到最直接

fhuibo 2003-10-28

打赏
举报

procedure TTADO.Button7Click(Sender: TObject);
var
s: string;
begin
S := 'select * into F from F in ''D:\'' ''dbase 5.0';
// + ' From OpenDataSource'
// + '(''Microsoft.Jet.OLEDB.4.0'',''Data Source="D:\";Extended Properties="DBase 5.0"'')...F';
Caption := DateTimeToStr(Time);
Timer1.Enabled := true;
ADOConnAccess.Execute(S);
Caption := Caption + ' ' + DateTimeToStr(Time);
end;

chenfeng3000 2003-10-28