delphi将excel转换为dbf文件

james_li85 2012-04-04 11:22:44
各位大牛,请问如何将excel转换为dbf文件?
想通过下面的语句进行处理

var
MyExcel,sheet:Variant;
begin
try
MyExcel:=CreateOLEObject( 'Excel.Application ');
MyExcel.WorkBooks.Open( 'E:\Test.xls ');
MyExcel.Visible:=False;
//MyExcel.WorkSheets[1].Activate;
MyExcel.WorkSheets[1].SaveAs( 'E:\Test.dbf ',xldbf4);
MyExcel.WorkBooks[1].Saved := True;
finally
MyExcel.ActiveWorkBook.Close;
MyExcel.Quit;
MyExcel:=UnAssigned;
end;
end;

结果提示undeclared identifier xldbf4
请问有什么方法可以实现吗?非常感谢
...全文
191 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
龙卷身 2012-05-15
  • 打赏
  • 举报
回复
[Quote=引用 7 楼 的回复:]

dbf 和excel都需要安装三方支持,delphi才能访问。如果是只是转换工作,用excel打开后另存为dbf即可,不要这样麻烦了。
[/Quote]
++
babydog01 2012-05-15
  • 打赏
  • 举报
回复
dbf 和excel都需要安装三方支持,delphi才能访问。如果是只是转换工作,用excel打开后另存为dbf即可,不要这样麻烦了。
天涯倦客 2012-05-15
  • 打赏
  • 举报
回复
有个dbf的控件可以直接 操作dbf
james_li85 2012-05-15
  • 打赏
  • 举报
回复
怎么导入导出?请明示
谢谢
[Quote=引用 4 楼 的回复:]
导入导出即可
[/Quote]
山东蓝鸟贵薪 2012-04-08
  • 打赏
  • 举报
回复
导入导出即可
yjkita 2012-04-05
  • 打赏
  • 举报
回复
没定义的xldbf4 ,出错提示是不是先解决掉!再来调试你的代码是否可行。
james_li85 2012-04-05
  • 打赏
  • 举报
回复
请问该怎么定义?我就是不清楚怎么定义xldbf4,谢谢
[Quote=引用 1 楼 的回复:]
没定义的xldbf4 ,出错提示是不是先解决掉!再来调试你的代码是否可行。
[/Quote]

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧