34,692
社区成员
发帖
与我相关
我的任务
分享
BULK INSERT --?
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from T_RES_ECO_PASS');
ADOQuery1.Open;
SMImportFromXLS.SourceFileName:=RzButtonEdit2.Text;
SMImportFromXLS.Mappings.Clear;
SMImportFromXLS.Mappings.Add('WKO_TYPE=A');
SMImportFromXLS.Mappings.Add('SendData=B');
SMImportFromXLS.Mappings.Add('ECONO=C');
SMImportFromXLS.Mappings.Add('subject=D');
SMImportFromXLS.Mappings.Add('EcrNo=E');
SMImportFromXLS.Mappings.Add('ECOCC=F');
SMImportFromXLS.Mappings.Add('Model=G');
try
SMImportFromXLS.Execute;
InsertECOLOG;
except
MessageDlg('請選擇要導入的Excel檔案!',mtWarning,[mbOK],0);
Exit;
end;
end;