我的excel中的数据导入进access再转换成interbase的数据库,进行控制?

xiaopan 2001-10-08 09:59:26
怎样将excel中的数据导入进access再转换成interbase的数据库,进行控制?
我是先用access打开excel,再用odbc连接,但是只有数据库,不能形成表格进行控制,怎么办?请指教
...全文
82 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
xiaopan 2001-10-08
  • 打赏
  • 举报
回复
up
lizhenjia 2001-10-08
  • 打赏
  • 举报
回复
用ole,假设excel文件中有3列
var
eapp,workbook,worksheet:variant;
i,j:integer;
begin
eapp:=createoleobject('excel.application');
eapp.workbooks.open('c:\lzj.xls');
eapp.visible:=false;
workBook:=msexcel.activeworkbook;
worksheet:=workBook.worksheets[1];
for i=1 to worksheet.UsedRange.Rows.Count do
begin
query1.fields[0].value:=worksheet.cells[i,1].value
query1.fields[1].value:=worksheet.cells[i,2].value
query1.fields[2].value:=worksheet.cells[i,3].value
query1.next;
end;
workbook.close;
eapp.quit;
eapp:=unassigned;
end;
随便写的,不一定准确,但意思是对的.

2,507

社区成员

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

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