AdoQuery 的问题
大致结构如下:
try
AdoQuery1.Close;
AdoQuery1.SQL.Clear;
AdoQuery1.SQL.Add('INSERT INTO AnteMain (ID,Anter,AnteDate,Code,Val,Flag)'+#13
+'VALUES (:ID,'+#39+'fwz'+#39+',:Date,0,:All,0)');
AdoQuery1.Parameters.Items[0].Value := ID;
AdoQuery1.Parameters.Items[1].Value := now;
AdoQuery1.Parameters.Items[2].Value := SumValue;
finally
AdoQuery1.ExecSql;
AdoQuery1.Active := true;
// ID:=ID+1;
end;
为什么提示:
ADOQuery1: commandtext does not return a result set;