excel与SQL联接. ( 积分: 100 )

我用的ADOCONNECTION数据模块!现在想用把EXCEL导入SQL中,不知道怎么样实现,我是个新手,希望能得到大虾们的支持呀,QQ350448261就这么一点分了.

我用的ADOCONNECTION数据模块!现在想用把EXCEL导入SQL中,不知道怎么样实现,我是个新手,希望能得到大虾们的支持呀,QQ350448261就这么一点分了.

摘：
1、
你可以用excel的odbc driver在控制面板的odbc data sources里
建立user data source，比如叫myexcel,设定workbook为your.xls
,然后你就可以用delphi自带的datadump把xls里的内容导入到sql server里了
2、
将Excel的数据导入SQL server :
-- ======================================================
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:/book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]

实例:
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:/Finance/account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
这种做法又快又省

能说详细点吗,是不是分数太少了呀!以后再加

能说详细点吗,是不是分数太少了呀!以后再加

ADOCONNECTION.Connected:=false;
ADOCONNECTION.Execute('SELECT * into newtable FROM OpenDataSource(''Microsoft.Jet.OLEDB.4.0'',''Data Source="'+''+EXCELfilename+''+'";Extended Properties="Excel 8.0;HDR=Yes;";Persist Security Info=False'')...Sheet1$');
//newtable是要导入的表名，EXCELfilename是EXCEL文件名（文件的路径+文件名），Sheet1$是工作薄的名
ADOCONNECTION.Connected:=true;

谢谢各位了,我先试试,不行的话,再向各位请教!

lngdtommy: 您好,
我试了你的办法,编译出错

怎么没人回答呀?是不是分太少了呀,!以后再加/
告诉我读EXCEL表中的每个单元格的函数

多人接受答案了。