怎样用DELPHI写程序让EXCLE的表导入到SQL SERVER一张的表中

Question

通用机电产品申购计划表
工卡编号：
填报单位盖章 （Ⅱ）       2001年 8 月13 日
申 编制人： 设 计划编号：
报 科长：                          分管厂长 备 科        长：
单 计划类型：急件(    )追加(    )检修（  ）普通（  ） 部 总计划员：                         计划承办人：

序号 备件代码 备  件  名  称 型号规格（图号） 主机名称 数 量 单 价 交 货 期 原  供  货  单  位 备     注
1 5533 电     机  Y160M-4/11KW 1台 2001.9.20
2 5533 电     机  Y250M-4/55KW 2台 2001.9.20
3 5533 电     机  Y225M-4/45KW 3台 2001.9.20
4 5533 电     机  Y315S-4/110KW 3台 2001.9.20
5 5533 电     机  Y180L-4/22KW 1台 2001.9.20
6 5533 电     机  Y132S-4/5.5KW 1台 2001.9.20
7 5533 滑  差  电  机 YCT250-4B/22KW 11台 2001.9.20
以上是一张EXCLE的表要把以下列:
'序号 备件代码 备  件  名  称 型号规格（图号） 主机名称 数 量'
导入到SQL SERVER的一张表中.

Answer 1

序号 备件代码 备件名称          型号规格（图号） 数 量
1 5533 电     机  Y160M-4/11KW 1台
2 5533 电     机  Y250M-4/55KW 2台
3 5533 电     机  Y225M-4/45KW 3台
4 5533 电     机  Y315S-4/110KW 3台
5 5533 电     机  Y180L-4/22KW 1台
6 5533 电     机  Y132S-4/5.5KW 1台
7 5533 滑  差  电  机 YCT250-4B/22KW 11台

Answer 2

不太好实现,除非你定义好Excel的某一行(或列)对应某一个字段,这是可以写的!

Answer 3

这个问题有很多旧贴，但近两天我在实际运用时发现都存在一些问题
这是我的解决办法1、opendatasource(详细用法查SQL帮助)
  insert into 你的表 from opendatasource('Microsoft.Jet.OLEDB.4.0',
  'Data  Source="\\192.168.0.3\partno\book2.xls";User ID=Admin;Password=;
Extended properties=Excel 8.0')...book2$
  上面特别注意你你如果不在SQL服务器上进行数据导入一定要写明网络路径，且EXCEL文件所在目录要共享，还有从服务器能访问该共享文件！！！。当然，如果在一台机上就可以写成：c:\book2.xls
  另外一个问题是，从EXCEL导入后，其字段顺序可能会被打乱，所以最好把EXCEL的第一列标题改为如A001，A002A105（SQL自动排列为A、B、C。，我导了N次总是出现数据转换失败的错误，才发现是这个问题，就是写成A01，A02A105都有问题，到了A10后SQL会自动排序号到A100）2、bcp(详细用法查SQL帮助)
   EXEC master..xp_cmdshell 'bcp MARKWINS01.dbo.AB IN C:\book5.xls -
    c -S"ERPSERVER" -U"sa" -P"songerppass'还是bcp好，无论是导入还是导出，速度快数据转换不会出问题。
  

Answer 4

如上现在SQL查询分析器进行调试
而后可在DELPHI中用数据集控件如ADOQUERY进行处理
代码我就不写了

Answer 5

代码我可以提供呀！LOOK：http://218.56.11.178:8020/web/index.aspx
-》下载基地-》例程-数据库/报表-》动态调用Excel数据表连上以后，就象操作普通数据表一样操作就OK了，不过要退出delphi去运行。