Foxtable(狐表) → 用户栏目 → 专家坐堂 → 事务处理问题


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

主题：事务处理问题
帅哥哟，离线，有人找我吗？
凡夫俗子
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：457 积分：3523 威望：0 精华：0 注册：2016/1/22 18:17:00 		事务处理问题  发帖心情 Post By：2016/4/28 20:56:00 [只看该作者]

 dim tran as SqlTransaction = null   ‘声明一个事务对象  
    try  
         dim conn as SqlConnection = new SqlConnection("server=.;uid=sa;pwd=sa;database=Test;"))  
          conn.Open() '打开链接  
               tran = conn.BeginTransaction()
                   dim copy as SqlBulkCopy = new SqlBulkCopy(conn, SqlBulkCopyOptions.Default, tran))  
                   copy.Destinati  '指定服务器上目标表的名称  
                    copy.WriteToServer(MyDataTable)   '你的datatable名字,执行把DataTable中的数据写入DB  
                    tran.Commit()                                  '提交事务  
    catch (Exception ex)  
           tran.Rollback()    '返回False 执行失败！  
  end try
这段代码如何改成FT的事务处理了
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/4/28 23:47:00 [只看该作者]

1、必须是sqlserver数据库

 

2、

 

Dim tran As System.Data.SqlClient.SqlTransaction
try
    Dim conn As new System.Data.SqlClient.SqlConnection("server=voyo;uid=sa;pwd=hailun.;database=Test")
    conn.Open() '打开链接
    tran = conn.BeginTransaction()
    Dim mapping1 As new System.Data.SqlClient.SqlBulkCopyColumnMapping("第一列", "第一列")
    Dim mapping2 As new System.Data.SqlClient.SqlBulkCopyColumnMapping("第二列", "第二列")
    Dim copy As new System.Data.SqlClient.SqlBulkCopy(conn, System.Data.SqlClient.SqlBulkCopyOptions.Default, tran)
    Copy.ColumnMappings.Add(mapping1)
    Copy.ColumnMappings.Add(mapping2)
    copy.DestinationTableName = "表D" '指定服务器上目标表的名称
    copy.WriteToServer(DataTables("表D").basetable)   '你的datatable名字,执行把DataTable中的数据写入DB
    tran.Commit()                                  '提交事务
    msgbox("OK")
catch ex As exception
    msgbox(ex.message)
    tran.Rollback()    '返回False 执行失败!
End try

[此贴子已经被作者于2016/4/28 23:47:17编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/4/28 23:48:00 [只看该作者]

 mark ODBC

 回到顶部
帅哥哟，离线，有人找我吗？
凡夫俗子
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：457 积分：3523 威望：0 精华：0 注册：2016/1/22 18:17:00 		  发帖心情 Post By：2016/4/29 0:11:00 [只看该作者]

谢谢这么晚了还在工作
 回到顶部
帅哥哟，离线，有人找我吗？
凡夫俗子
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：457 积分：3523 威望：0 精华：0 注册：2016/1/22 18:17:00 		  发帖心情 Post By：2016/4/29 0:17:00 [只看该作者]

建议论坛开通打赏功能
 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2016/4/29 8:47:00 [只看该作者]

这个能加上条件吗?  是不是后台数据存在就更新,不存在就插入的?

 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2016/4/29 8:58:00 [只看该作者]

SqlBulkCopy 这个是不是用于插入?
SqlDataAdapter  这个是用于更新?
 回到顶部
帅哥哟，离线，有人找我吗？
Hyphen
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00 		  发帖心情 Post By：2016/4/29 9:09:00 [只看该作者]

顾名思义，BulkCopy，就是批量复制的意思，只适合批量新增数据

设置一下BatchSize，性能会更上一层，BatchSize一般在500~1000之间，性能相对可靠一点
Dim tran As System.Data.SqlClient.SqlTransaction
try
    Dim conn As new System.Data.SqlClient.SqlConnection("server=voyo;uid=sa;pwd=hailun.;database=Test")
    conn.Open() '打开链接
    tran = conn.BeginTransaction()
    Dim mapping1 As new System.Data.SqlClient.SqlBulkCopyColumnMapping("第一列", "第一列")
    Dim mapping2 As new System.Data.SqlClient.SqlBulkCopyColumnMapping("第二列", "第二列")
    Dim copy As new System.Data.SqlClient.SqlBulkCopy(conn, System.Data.SqlClient.SqlBulkCopyOptions.Default, tran)
    Copy.ColumnMappings.Add(mapping1)
    Copy.ColumnMappings.Add(mapping2)
    copy.DestinationTableName = "表D" '指定服务器上目标表的名称
    copy.BatchSize = 1000
    copy.WriteToServer(DataTables("表D").basetable)   '你的datatable名字,执行把DataTable中的数据写入DB
    tran.Commit()                                  '提交事务
    msgbox("OK")
catch ex As exception
    msgbox(ex.message)
    tran.Rollback()    '返回False 执行失败!
End try
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/4/29 9:15:00 [只看该作者]

以下是引用blackzhu在2016/4/29 8:58:00的发言：
SqlBulkCopy 这个是不是用于插入?
SqlDataAdapter  这个是用于更新?

 

大量数据的时候，用这个 SqlBulkCopy

 

少量数据的更新，可以用 SqlDataAdapter 
 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  10楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2016/4/29 9:22:00 [只看该作者]

我刚才测试了一下:

Dim tran As System.Data.SqlClient.SqlTransaction
try
   Dim conn As new System.Data.SqlClient.SqlConnection("****************************")
    conn.Open() '打开链接
    tran = conn.BeginTransaction()
    Dim mapping1 As new System.Data.SqlClient.SqlBulkCopyColumnMapping("员工编号", "员工编号")
    Dim mapping2 As new System.Data.SqlClient.SqlBulkCopyColumnMapping("姓名", "姓名")
    Dim copy As new System.Data.SqlClient.SqlBulkCopy(conn, System.Data.SqlClient.SqlBulkCopyOptions.Default, tran)
    Copy.ColumnMappings.Add(mapping1)
    Copy.ColumnMappings.Add(mapping2)
    copy.Destinati
    copy.WriteToServer(DataTables("用户登录").basetable)   '你的datatable名字,执行把DataTable中的数据写入DB
    tran.Commit()                                  '提交事务
    msgbox("OK")
catch ex As exception
    msgbox(ex.message)
    tran.Rollback()    '返回False 执行失败!
End try

用户编号没有写入,只写入了姓名,像这个我如何来排除后台已经存在的用户编号以及姓名? 是不是只适合大量数据的导入后的写入?
[此贴子已经被作者于2016/4/29 9:23:37编辑过]
 回到顶部
总数 31 1 2 3 4 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05078 秒, 4 次数据查询