关闭

delphi事务处理

178人阅读 评论(0) 收藏 举报
分类:
adoconnection1.begintrans;         // 开始事务
try
  adoconnection1.execute(sqlstr1);
  adoconnection1.execute(sqlstr2);
  ...
  adoconnection1.execute(sqlstrN);
  adoconnection1.commitrans;       // 提交事务
  showmessage('操作成功');
except
  adoconnection1.rollbacktrans;    // 事务回滚
  showmessage('操作失败');
end;
0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:125284次
    • 积分:3343
    • 等级:
    • 排名:第10436名
    • 原创:215篇
    • 转载:21篇
    • 译文:1篇
    • 评论:3条
    最新评论