怎么在delphi中把excel文件导入sql，请讲详细一点，我是低手！我用的是bde. (100分)

W

wanglong3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #1

越详细越好！

 

M

mjy97

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #2

用TblobField操作
TBlobField(adoqrReport.Fields.Fields[2]).LoadFromFile('report.xls');

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #3

Excel也是个表！！

 

H

hbezwwl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #4

使用stream,DELPHI的帮助里有。

 

P

powerkom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #5

第一，确认你的execl表是只有一个sheet，同时第一行是字段名。
最好把execl表的内容存为其他数据库格式，例如dbaseV，再用delphi的datapump倒过去。

 

完

完颜康

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #6

用Sql也可以导进去！

 

S

sanming

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #7

对，直接用SQL中的导入数据就行了。

 

西

西门吹水

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-01

• #8

EXCEL TO SQL SERVER
先用ODBC建立一个数据源，数据源指向sql server的表，然后用TTABLE控件联上数据库，
再建立一个OleObject，然后用Append，Post把数据导入到EXCEL表。
实例：
var
MSExcel:Variant;//定义一个全程变量

MSExcel := CreateOleObject('Excel.Application');
MSExcel.WorkBooks.Open(Edit1.Text);//创建一个OleObject

Table.Active:=true;
Table.Append;
Table.FieldByName('字段名').Value:=MSExcel.Cells[rows_i,1].Value;
//上面一句可以根据具体情况多次引用。
Table.Post;//实现导入

我做过相应的工作，并运行通过。
还有不明白，欢迎来信 anycall2000@21cn.com.
[]

 

L

liangbq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-02

• #9

例如：SELECT * INTO YourTableName FROM
OPENROWSET('MSDASQL.1', 'driver=Microsoft Excel Driver (*.xls);
DBQ=e:/temp/book2.xls','select * from [sheet1$]')

 

U

unreason

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-02

• #10

在sql server中有import data..的功能,可直接导入execl表.

 

V

vickymade

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-02

• #11

用ODBC建立一个数据源，数据源指向sql server的表，然后用TTABLE控件联上数据库，
再建立一个OleObject，然后用Append，Post把数据导入到EXCEL表

 

W

wanglong3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-08

• #12

多人接受答案了。