- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [原创]事务处理函数——感谢逛逛、狐爸、bin、有点甜 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=46326)
-- 发布时间：2014/2/21 8:13:00
-- [原创]事务处理函数——感谢逛逛、狐爸、bin、有点甜
已经写好了，经测试可以用 \'向服务器提交数据的事务函数 Args(i) 表示SQL 语句 \'获取数据库连接 Dim cn As New System.Data.OleDb.OleDbConnection(Connections("EAERP").ConnectionString) Dim cmd As new System.Data.OleDb.OleDbCommand cn.Open() cmd.Connection = cn Try cmd.Transaction = cn.BeginTransaction() For i As Integer =0 To args.length-1 cmd.CommandText = args(i) cmd.ExecuteNonQuery Next cmd.Transaction.Commit() Catch ex As Exception cmd.Transaction.Rollback() cmd.Dispose() \'释放 CN.CLOSE() MessageBox.Show(ex.tostring,"向服务器提交数据错误!",MessageBoxButtons.OK) Return False End Try cmd.Dispose() \'释放 CN.CLOSE() Return True |
[此贴子已经被作者于2014-2-21 8:13:21编辑过]
-- 发布时间：2014/2/21 8:14:00
--
其中，EAERP替换成你自已的外部数据源
环境FOXTABLE+SQL SERVER
-- 发布时间：2014/2/21 8:21:00
--
呵呵，多谢楼主。
希望大家向楼主学习，接受帮助，也不忘记分享成果，帮助后来者。
-- 发布时间：2014/2/21 8:57:00
--
本来想搞个回复可见，好像我还没有这个权限，不久这个贴子，会很快沉下去，建议狐爸置顶，方便对有事务要求的童鞋有帮助！
-- 发布时间：2014/2/21 9:11:00
--
呵呵！狐爸爸如果能对这个功能进一步的提供一些例子和说明就更好了。
-- 发布时间：2014/3/1 13:39:00
--
以下是引用yankunhao在2014-2-21 9:11:00的发言：
呵呵！狐爸爸如果能对这个功能进一步的提供一些例子和说明就更好了。
我也贊成。
-- 发布时间：2014/3/1 14:54:00
--
贊成
-- 发布时间：2014/3/1 19:39:00
--
马上就会好
-- 发布时间：2014/3/1 20:47:00
--
留记号
-- 发布时间：2014/3/1 21:30:00
--
要是能上个例子那就太好了！