

如何将excel文件导入到mssql中(dephi)
uses里面添加excel97,excel2000
with DM1.ADOQuery2 do try
????? if OpenDialog1.Execute then begin
???????? RzEdit1.Text :=? OpenDialog1.FileName;
????? end;
????? Close;
????? SQL.Clear;
??????SQL.Add('insert?? into?? temp1? select? * from? OpenDataSource(''Microsoft.Jet.OLEDB.4.0'',''Data Source="'+RzEdit1.Text+'";Extended Properties=Excel 8.0;Persist Security Info=False'')...[Sheet1$]');
????? ExecSQL;
??? except
????? Messagebox(handle,'内容插失败!','错误',MB_OK+MB_ICONERROR);
????? Exit;
??? end;
query的paramcheck属性设为false否则有错误。
其实很简单 ,但sql部分始终写的不正确导致错误,网上很多的例子也未写的很清楚,这里一起研究探讨.
————————————————
版权声明:本文为CSDN博主「onesun_forever」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/onesun_forever/article/details/2188092