请各位看看如下代码,问题出现在哪里?????
with query1 do
begin
close;
sql.Clear;
sql.Text:='insert into user1(字段名) values("'+Edit2.Text+"')';
open;
end;
with query1 do
begin
close;
sql.Clear;
sql.Text:='insert into user1(字段名) values("'+Edit2.Text+"')';
open;
end;
//-------------------------- with query1 do
begin
close;
sql.Clear;
sql.Text:='insert into user1(字段名) values("'+Edit2.Text+"')';
//open; 此处错
ExecSQL; //insert怎么会有数据返回,没有数据集返回就不能用Open
//只有select 才能用Open
//其他如insert, delete , update ...没有数据集返回的
//都用ExecSQL
end;
否则用 execsql