Foxtable(狐表)用户栏目专家坐堂 → 请教:逐行写入数据库,这样使用数据库事务妥否?


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

主题:请教:逐行写入数据库,这样使用数据库事务妥否?

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


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/8/31 9:36:00 [显示全部帖子]

Try
    Connections("salaryMS").BeginTransaction() '开始事务
    Dim dt As DataTable
    Dim cmd As New SQLCommand
    cmd.C
    For Each r As Row In t.Rows
        GH=r("工号")
        XM=r("姓名")
        cmd.CommandText = "Insert Into {报盘记录} ([工号],[姓名]) Values ('" & GH & "','" & XM & "')"
        cmd.ExecuteNonQuery
    Next
    Connections("salaryMS").Commit '提交事务,所有操作生效
Catch ex As Exception '如果出错
    Connections("salaryMS").Rollback() '回滚事务,撤销所有操作
End Try

 回到顶部