求一个可以运行的excel导入SQL码,在线等....(100分)

D

dsgllxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-19

• #1

用Delphi实现的最快[]方法,OLE+Loop太慢[!]了.

 

D

dsgllxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-19

• #2

专家都埋伏起来了吗?[?]

 

X

xingxin00

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-19

• #3

[8D]

 

E

eastweast

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-19

• #4

我以前是用ole的方式。<br>如果是比较简单的表格，可考虑使用xml档<br>或者直接使用txt格式，但是扩展名用xls，这样的速度飞快，只是没有格线。<br>没有代码，提供思路给你。哈有1年多没怎么弄Delphi了。

 

D

dsgllxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-19

• #5

eastweast真是一位热心人,在此向你致敬![]

 

大

大器晚成

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-20

• #6

如果不讲究格式用下面的方法很快:<br>&nbsp; &nbsp;SaveDialog.Filter:='Excel文件 (*.xls)|*.xls';<br>&nbsp; &nbsp;SaveDialog.DefaultExt:='xls';<br>&nbsp; &nbsp;if SaveDialog.Execute then<br>&nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; dxdbgrid1.SaveToXLS(SaveDialog.FileName,true);<br>&nbsp; &nbsp; &nbsp; showmessage('数据已导出！');<br>&nbsp; &nbsp;end;

 

D

dsgllxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-20

• #7

楼上说的是导出到EXCEL,反过来从从EXCEL到入SQL怎么解决.[]

 

Z

zyqcwz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-09-21

• #8

insert ab(a1,a2) select * from opendatasource('microsoft.jet.oledb.4.0','<br>datasource="c:/tem/a.xls";extended<br>properties="excel 5.0;hdr=yes;";<br>presist security info=false')..a$