以下过程在运行时报错说 : insert into 的语法错误
procedure TDataModule2.insertrecord;
begin
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('insert into User(UserName,Password) values(:User,:Pwd)');
Parameters.ParamValues['User']:='ABC';
Parameters.ParamValues['Pwd']:='123';
ExecSQL;
end;
end;
procedure TDataModule2.insertrecord;
begin
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('insert into User(UserName,Password) values(:User,:Pwd)');
Parameters.ParamValues['User']:='ABC';
Parameters.ParamValues['Pwd']:='123';
ExecSQL;
end;
end;
query2的sql为: insert into table values(:a1, :a2, ...:aN)程序中: Query2.ParamByName('a1').AsString := Query1.FieldByName('a1').AsString;Query2.ParamByName('a2').AsString := Query1.FieldByName('a2').AsString;......Query2.ParamByName('aN').AsString := Query1.FieldByName('aN').AsString;Query2.ExecSQL;