delphi中把EXCEL中的数据导入到SQL中(10)

  • 主题发起人 主题发起人 rakestone
  • 开始时间 开始时间
R

rakestone

Unregistered / Unconfirmed
GUEST, unregistred user!
如题 最好提供全部代码 小弟比较菜 只给部分代码比较看不懂
 
http://hi.baidu.com/vistra/blog/item/285e1ad3bd2f25073af3cfca.html
 
全文搜索或大富翁的离线库中搜索,你的问题以往很多人问到
 
我需要的是 完整代码 最好是代码头都有
 
可以用ADOCONNECTION连接excel表。连接字符串如下:Provider=MSDASQL.1;Persist Security Info=False;Data Source=Excel Files;Initial Catalog=z:/vnetNew/work.xls数据集SQL语句如下:Select * from [Sheet1$]把EXCEL内容导入后想怎么处理就怎么处理了。
 
这个以前很多人都解答过吧,例如把"D:/test.xls"文件导入到SQL中生成"testXls"表:sqlstr := 'SELECT * into testXls FROM OpenDataSource( '+#39+'Microsoft.Jet.OLEDB.4.0'+#39+','+ #39+'Data Source="'+'D:/test.xls'+'";User ID=Admin;Password=;Extended properties=Excel 8.0'+#39+')...sheet1$';ADOConnection1.Execute(sqlstr)其中"sheet1$"要根据Excel表格中sheet具体的名称而定
 
后退
顶部