如何把Execel文件中的内容导入到数据库中？

Question

如是用sql server的话可以用opendatasource或openrow做查询，一个sql语句就可以实现了，很简单的具体可查看一下sql server的help,最笨最不脑的办法，用ado建立两个连接，然后把所要转换的表循环不就ok了吗！

Answer 1

这是我写的用ado把数据导入access的一些片断
jet.oledb.4.0功能强大，不但可以连接access，还可以连接dbase,paradox,excel,text等几乎所有的本地数据库。你可以一条一条地读出来再写入，也可以用一条sql语句来做，我想这两种方式的效率你应该心中有数了吧？~~
下面我就说一说如何把excel数据导入成access数据库。
假如你在d:\下有一个excel文件叫tmp.xls，其中有一个工作表叫sheet1,表中的数据如下
业务统计表
字段1 字段2 字段3 字段4
2 2 4 2
2 4 2 2
2 3 1 3
2 1 1 2
1 1 2 1
现在要把这个表导入D:\test.mdb中并命名为ywb3。操作步骤为：
1、确保已经有D:\test.mdb这个文件，并且其中没有ywb3这个表。
2、打开tmp.xls,把你要导入的数据选起来，包括字段名(“字段1、字段2等等，不包括表题名("业务统计表"),起一个名称ywb3(操作方法为在excel名称框中输入ywb3按回车确认)。
3、设置ado组件的connectionstring为
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\tmp.xls;Extended Properties=excel 8.0;Persist Security Info=False
4、这一步非常关键，如果你是用adotable,把tabledirect设为false,(true只有在excel表没有表题，是一个纯二维表是才能用)，并且在tablename中选ywb3(就是你是excel名称框中输入的名称,其中有一些是你在excel工作薄中的工作表名+$，只有在没有定义名称的情况下才用选他们),就可以正确的在dbgrid中显示、处理数据了；要把数据导出成access文件，要使用adoquery或adodataset或adocommand组件，我以adocommand组件为例,设置commandtext为
select *  into ywb3  in "d:\test.mdb" from ywb3,然后执行adocommand1.Execute就可以把数据导出到d:\test.mdb中的ywb3了，当然你还可以加where条件来限制导出的数据。
5、补充说明
你可以把excel中的一个工作表中的多块数据区域定义成不同的名称，在ado中看来就是一张不同的表，你就可以对这些表进行各种sql操作了，比如查询，更新，删除，甚至删除等等。
我这样说够明白了吧!