求救：把EXCEL中的记录，一条条导入到已经存在表的SQL SERVER2000中，

2004-05-08 08:22:35 203 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

使用Python开发TreeATE的测试脚本常见问题 ImportError: No module named py_compile 找不到 DevLangPython3.dll 以上2个问题都是没有安装正确的Python，当前TreeATE依赖32位Python 2.7版本，暂时不支持Python 3以上版本阅读详情

要求从EXCEL中存在的学生的基本情况的每条记录（学号，姓名，年龄）导入到SQL SERVER 中，其中在SQL SERVER 中表stu_info已经存在了。
我用这条语句不行，因为这条语句下的表已经存在了。
ADOConn.Execute('SELECT * INTO stu_info IN ".\kaoshi.mdf" ' +
'FROM ".\Excel表.sheet1" "sheet1;"');

大侠们救命啊，这是我的毕业设计，要交了。
你们有没有已经做好的从EXCEL导入到SQL SERVER呀，如果有的，请给我好吗？小弟在这儿叩拜，253了。

...全文

EDA开源仿真工具verilator入门4:访问函数介绍访问函数（Visitor Function）是verilator算法实现的主要工作方式之一，本节将介绍一下访问函数。阅读详情

liogking

Delphi 5,944 成员 262,941 内容

+ 关注 + 加入社区

切换为时间正序

zhangxinji 2004-07-22

打赏
举报

select * from openrowset('MICROSOFT.JET.OLEDB.4.0','HDR=YES;database=D:\张新纪0721\excel\法人_借款人.xls','select * from [sheet1$]')
出下面的错
OLE DB 提供程序 'MICROSOFT.JET.OLEDB.4.0' 报错。
[OLE/DB provider returned message: 找不到可安装的 ISAM。]
怎么回事啊

liogking 2004-05-10

打赏
举报

WWWWA：你好
我昭你的方法试过了，我是这样用的。
with DM.ADOQry do
begin
Close;
SQL.Clear;
sSQL :=
'INSERT INTO stu_info ()'
+ ' SELECT '
+ ' FROM [excel 8.0;database=' + '.\20000506 '+ '].[200005$]';
SQL.Text := sSQL;
Execsql;
end;
要出错，说是对像名excel 8.0;database=' + '.\20000506 '+ 无效
怎么会事呀！

guge 2004-05-08

打赏
举报

这个是将EXCEL中的数据一条条的读入到ACCESS中,希望对你有用.sql server没试过!
procedure Tshezhi.Button2Click(Sender: TObject);
var
msexcel:variant;
i:integer;
begin
OpenDialog1.Filter:='*.XLS|*.XLS';
OpenDialog1.DefaultExt:='XLS';
if OpenDialog1.Execute then
try

begin
msexcel:=createoleobject('excel.application');
msexcel.workbooks.open(opendialog1.FileName);
MSExcel.Visible:=False;

for i:=2 to MSExcel.ActiveSheet.UsedRange.Rows.Count do
begin
with DataM.susheTable1 do
begin
insert;
fieldbyname('宿舍编号').AsString:=MSExcel.Cells[i,1].Value;
fieldbyname('电话号码').AsString:=MSExcel.Cells[i,2].Value;

post;
end;
end;
MSExcel.ActiveWorkBook.Close;
MSExcel.Quit;
showmessage('数据导入成功!');
end
except
showmessage('操作失败!');
end;
end;

WWWWA 2004-05-08

打赏
举报

qry1是adoquery，指向SQLSERVER，然后
var
sSQL:string;
begin
qry1.Close;
qry1.SQL.Clear;
sSQL :=
'INSERT INTO card_table ( unitid,zgName, Sex)'
+ ' SELECT 单位编号, 姓名,性别'
+ ' FROM [excel 8.0;database=' + XlsName + '].[sheet1$]';
qry1.SQL.Text := sSQL;
qry1.Execsql;
end; 试试

liogking 2004-05-08

打赏
举报

有错，不知怎么办，请帮助。错误是很多的Missing operator or simicolon

with dsInport do
begin
CommandText:='';
CommandText:='insert * into stu_info (select * from opendataset('Microsoft.Jet.OLEDB.4.0','Data Source=".\20000506.xls"; Extended Properties="Excel 8.0;
HDR=Yes;";Persist Security Info=False')...200005$)

end;

lijinghe1 2004-05-08

打赏
举报

insert into stu_info IN ".\kaoshi.mdf" select * from ".\Excel表.sheet1" "sheet1;"

求救：把EXCEL中的记录，一条条导入到已经存在表的SQL SERVER2000中，

相关推荐