ryid:='78';
ryname:='flying';
ADOquery2.Connection:=Form1.ADOConnection1;
ADOquery2.Close;
ADOquery2.SQL.Clear;
with ADOquery2 do
begin
ADOquery2.SQL.Add('insert into ry_right values ('+quotedstr(ryid));
ADoquery2.SQL.Add(','+quotedstr(ryname)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+')');
ADoQuery2.Open;
ADOquery2.ExecSQL;
end;***************************8
我想用这些代码往ry_right表里加一条数据:
78 flying 0 0 0 0 0 0 0 0
编译时数据是可以加进去!但就是要报错:
ADOQuery2: CommandText does not return a result set是怎么回事?
ryname:='flying';
ADOquery2.Connection:=Form1.ADOConnection1;
ADOquery2.Close;
ADOquery2.SQL.Clear;
with ADOquery2 do
begin
ADOquery2.SQL.Add('insert into ry_right values ('+quotedstr(ryid));
ADoquery2.SQL.Add(','+quotedstr(ryname)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+','+inttostr(0)+')');
ADoQuery2.Open;
ADOquery2.ExecSQL;
end;***************************8
我想用这些代码往ry_right表里加一条数据:
78 flying 0 0 0 0 0 0 0 0
编译时数据是可以加进去!但就是要报错:
ADOQuery2: CommandText does not return a result set是怎么回事?
ADoQuery2.Open;
ADOquery2.ExecSQL;这两条语句用一条就可以
ADOquery2.ExecSQL;
的意思是不返回数据集. 比如用insert , append后就用这个语句
返回数据集的用open,否则用execsql