input1:=inputbox('数据备份','单1表名','');
input2:=inputbox('数据备份','单2表名','');
datamodule2.adoquery2.close;
datamodule2.adoquery2.sql.Clear;
datamodule2.adoquery2.SQL.Add('select * into '''+trim(input1)+''' from 不合格清单');
datamodule2.adoquery2.open;
showmessage('单1备份完毕');
datamodule2.adoquery2.close;
datamodule2.adoquery2.sql.Clear;
datamodule2.adoquery2.SQL.Add('select * into '''+trim(input2)+''' from 开单不合格');
datamodule2.adoquery2.open;
showmessage('单2备份完毕');
哪里错了?该怎么写呀!??
input2:=inputbox('数据备份','单2表名','');
datamodule2.adoquery2.close;
datamodule2.adoquery2.sql.Clear;
datamodule2.adoquery2.SQL.Add('select * into '''+trim(input1)+''' from 不合格清单');
datamodule2.adoquery2.open;
showmessage('单1备份完毕');
datamodule2.adoquery2.close;
datamodule2.adoquery2.sql.Clear;
datamodule2.adoquery2.SQL.Add('select * into '''+trim(input2)+''' from 开单不合格');
datamodule2.adoquery2.open;
showmessage('单2备份完毕');
哪里错了?该怎么写呀!??
把open改成ExecSQL呢Email:[email protected]
datamodule2.adoquery2.SQL.Add('select * into '+trim(input1)+' from 不合格清单');
datamodule2.adoquery2.SQL.Add('select * into '+trim(input2)+' from 开单不合格');
datamodule2.adoquery2.SQL.Add('select * into '+''''+trim(input1)+'''' +'from 不合格清单');
datamodule2.adoquery2.SQL.Add('select * into '+''''+trim(input2)+'''' +'from 开单不合格');
input2:string; 是不是不正确?/?