请问怎样用程序实现将 Excel 数据 导入数据库 ?(50分)

  • 主题发起人 主题发起人 leader47
  • 开始时间 开始时间
L

leader47

Unregistered / Unconfirmed
GUEST, unregistred user!
请问怎样用程序实现将 Excel 数据 导入数据库 ?

请给点提示。。。
 
SQL SERVER中?
http://www.delphibbs.com/delphibbs/DispQ.asp?LID=196114
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2574519
 
我在三层里做过
往oracle里导
我是从excel里读一条记录,调用clientdataset.appserver的函数,插入一条
感觉这样好麻烦
还容易出错

楼主是三层么
一起研究一下
116110337
 
方法很多,主要看你是什么环境,什么数据库,程序是做什么的?
比较一般的办法就是用delphi的控件(TExcelApplication/TExcelWorkbook/TExcelWorkSheet)来过,具体操作方法可以参看:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=759711
 
用SQL Server的DTS啊
或者查看碧血剑的文章。
 
将excel表配置成odbc。。。
然后不就简单了???
 
我也有同样的困难。
 
留下你的EMAIL 中午发代码段给你。
 
要看格式了,如果是复杂的表格,要先分析的,以为那些工具这么万能么?
 
楼上的, 当然是根据实际的要求再从新整理了。
 
V: Variant;
V:= CreateOleObject('Excel.Application');
V.WorkBooks[1].WorkSheets[1].Cells[Row,Col].Text
 
没什么特别要求。只要能把 Excel 导入delphi的某个控件(如:DBgrid),再插入数据库(Access)就可以。
我只知道这些,不知道具体用什么语句。请大家再指点一下。
 
1、用SQL语句
2、用DELPHI写代码---》ADO/ODBC
3、用DELPHI写代码---》OLE方式
4、直接分析文件格式 ---》直接读写EXCEL文件
 
Excel--->Access,然后在DBgrid中显示
edt_table.Text是Access的TableName
edt_excelPath.Text是excel的路径
edt_sheet.Text是excel的簿名
使用Sql语句如下,可以将Excel导入Access:
Sql:='select * into '+edt_table.Text+' FROM [excel 8.0;database='+edt_excelPath.Text+'].['+edt_sheet.Text+'$]';
 
多人接受答案了。
 
后退
顶部