我做了一个销售管理系统,在做到销售这一块,当销售某一件产品时,要对库存量进行减一操作,具体代码如下:
var cn:integer;
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from 库存详单 where 型号='''+flatcombobox1.Text+''' and 串号='''+flatedit2.text+'''');
adoquery1.Open;
adoquery1.First;
adoquery1.Edit;
cn:=adoquery1.FieldValues['数量'];
adoquery1.FieldValues['数量']:=cn-1; //从库存中删除一件该型号产品。
adoquery1.Post;//向库存提交;
cn:=adoquery1.FieldValues['数量'];
adoquery1.Post; //提交
if cn<=0 then adoquery1.Delete; //如果没有货就将其从库存中删除;
showmessage('交易完成,谢谢!');
end;
为什么我在运行的时候总是出现adoquery1:dataset not in edit or insert mode的错误啊请高手
指点?我用的是access数据库