求助:将Excel中数据导入SQL Server中时遇到的问题
使用DataSource、DBGrid、ADOQuery组件,目前可以实现将数据从Excel表中放到DBGrid中,但是却写不到SQL Server 2000数据库已建好的表中,而且没有错误提示信息。请问各位高手,这是什么原因。谢谢。
程序如下:
procedure TForm1.Button1Click(Sender: TObject);
var
sqlstr,connstr,sheetName,filename:string;
begin
FileName :='e:\Book1.xls' ;//Excel文件名
SheetName :='sheet1' ; //Excel中数据表名
ADOQuery1.Close ;
ADOQuery1.SQL.Clear ;
ConnStr :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + FileName + ';Extended Properties=Excel 8.0;Persist Security Info=False';
ADOQuery1.ConnectionString :=ConnStr ;
SqlStr :='Select * from ' +'[' +SheetName + '$'+']'; //打開表
ADOQuery1.SQL.Add(SqlStr) ;
ADOQuery1.ExecSQL;
ADOQuery1.Open ;
end;
问题点数:20、回复次数:3Top
1 楼allie_gpp()回复于 2006-05-03 09:52:04 得分 0
nobody help me!Top
2 楼yuanguangxing(星星)回复于 2006-05-03 13:30:13 得分 0
你这里也没有向SQL SERVER中写数据的代码呀
还有呀为什么执行两次查询 ADOQuery1.ExecSQL;
ADOQuery1.Open ;Top
3 楼allie_gpp()回复于 2006-05-03 19:18:05 得分 0
我执行两次都写不到数据库里去,为什么呢?Top




