with data_sr.ADOQuery1 do
begin
close;
sql.Text:='insert into openrowset('''+'Microsoft.Jet.OLEDB.4.0'''+
','''+defpath+'\data\rs_data.mdb'+''';'''+'admin'+''';'''',''select * from '+S_Table+''') select * from '+
S_Table+s_where;
//showmessage(sql.Text);
ExecSQL;
end;
怎么只导出部分数据。
要是加上showmessage(sql.text)导出的就是全部数据。
begin
close;
sql.Text:='insert into openrowset('''+'Microsoft.Jet.OLEDB.4.0'''+
','''+defpath+'\data\rs_data.mdb'+''';'''+'admin'+''';'''',''select * from '+S_Table+''') select * from '+
S_Table+s_where;
//showmessage(sql.Text);
ExecSQL;
end;
怎么只导出部分数据。
要是加上showmessage(sql.text)导出的就是全部数据。
with Data_SR.ADOConn_loca do
begin
try
s_sql:='insert into depa_code select * FROM depa_code IN [ODBC]'+
' [ODBC;Driver=SQL Server;UID=sa;PWD=system;Server=apan;DataBase=rsgl;]';
showmessage(s_sql);
Execute(s_sql);
except
showmessage('失败');
end;
--
又要取又要打开.mdb还得找这个.mdb,可能没有那么快吧,呵呵
是把sql server中的数据导到access里。
adoquery1联的是sql server