在一个循环语句中,查出第一条记录,将select出来的内容发送出去,然后将该表的FLAG字段改为1,但是运行到下面代码时总是报错。
代码如下: if query1.Active then query1.close;
query1.sql.clear;
query1.sql.Add('update plkt_rec');
query1.sql.add('set flag=''1'' where username=username[i]);
try
query1.ExecSQL;
database1.Commit;
except
database1.Rollback;
end;
statusbar1.Panels[1].Text:='ÒѾ­´¦ÀíÁË:'+inttostr(i)+'¸öÓû§...';
refresh;
错误提示:no user transaction is currently in progress
请高手帮忙
代码如下: if query1.Active then query1.close;
query1.sql.clear;
query1.sql.Add('update plkt_rec');
query1.sql.add('set flag=''1'' where username=username[i]);
try
query1.ExecSQL;
database1.Commit;
except
database1.Rollback;
end;
statusbar1.Panels[1].Text:='ÒѾ­´¦ÀíÁË:'+inttostr(i)+'¸öÓû§...';
refresh;
错误提示:no user transaction is currently in progress
请高手帮忙
解决方案 »
- PNG的透明部分如何不显示在图片上?
- ■●◆控件的paint,repaint,refresh,Update方法有什么不同吗?不同情况下应该如何调用?
- TreeView中加背景图片的问题
- 郁闷啊,远程连接服务器写存储过程出现错误啊555555555高分求救?????
- 请问怎么给decisioncube写代码?(大家帮帮忙啊)
- [重要通告]发生误删除事故!!!为此对各位CSDN上的朋友表示万分的歉意!
- 如何检测本机UDP服务端口是否被占用?
- ?如何将两个同名的数据库合并(不是覆盖),急呀
- 各位大侠:数据库问题,急急急....
- 谁在候杰的站点下载过电子书籍?为什么有错?
- 关于服务器列表的问题
- 动态自定义纸张大小的问题,请高手支持
try
query1.ExecSQL;
if query1.Active then query1.close;
query1.sql.clear;
query1.sql.Add('update plkt_rec');
query1.sql.add('set flag=''1'' where username=username[i]);
database1.Commit;
except
database1.Rollback;
end;
database1.begintrance;
try
...
database1.Commit;
except
database1.Rollback;
end;