Foxtable(狐表)用户栏目专家坐堂 → 事务代码如何修改


  共有1776人关注过本帖树形打印复制链接

主题:事务代码如何修改

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/10 11:04:00 [显示全部帖子]

不需要改什么。事务失败表1就不会删除,还回滚表1什么!

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/10 11:46:00 [显示全部帖子]

ExecuteNonQuery就是用来执行一条sql。使用参数化的方式执行,具体请去看组件的帮助

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/16 10:25:00 [显示全部帖子]

Try  
    Dim res As Integer = db.ExecuteNonQuery(tran, sq-l)  
if res > 0 then
    res = db.ExecuteNonQuery(tran, “delete from table1 ”)  
    If res = 0 Then  
        db.RollbackTransaction(tran, True)  '回滚事务,同时关闭数据库连接
        msgbox("取消事务")  
    Else  
        db.CommitTransaction(tran, True)  '提交事务,同时关闭数据库连接
        msgbox("执行成功")  
    End If  
End If  
Catch ex As Exception  

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/16 12:47:00 [显示全部帖子]

1、帮助有说明,从来没有看帮助的习惯的吗!res表示ExecuteNonQuery执行后影响的行数,比如插入10行,res=10,=0表示没有插入任何行,后面的代码也就没有执行的必要了

2、理论任何代码都可以放到一起

代码正常按书写的先后顺序执行

导入代码1
复制代码2
查询代码3

 回到顶部