新客网WWW.XKER.COM:致力做中国最专业的网络学院!
学院: 操作系统 - 网络应用 - 服务器 - 网络安全 - 工具软件 - 办公软件 - Web开发 - 数据库 - 网页设计 - 图形图像 - 媒体动画 - 硬件学堂 - 存储频道 - QQ专区
您的位置:首页 > 软件开发 > .Net开发 > Asp.net教程 > 正文:.net 中的事务总结

.net 中的事务总结

新客网 XKER.COM 2004-12-20 来源: 收藏本文
1>存储过程级别的事务。
create procedure AddInfo
(@studentname varchar(20),....)
as
begin transaction
insert ......
insert....
if .....
rollback transaction
update.....
.....
commit transaction
注:可以在存储过程中使用save transaction选择回滚的位置

2>数据库级别的事务处理。
需要导入Imports System.Data.SqlClient名称空间。

'This function will add student's infomation and its parent's information concurrently !
'So we should use transaction !
Public Shared Function InsertInfo(ByVal student As clsStudent, ByVal parent As clsParent) As Boolean

Dim success As Boolean = True
Dim cmdStudent As New SqlCommand("insert into student(name,sex,classname) values(@name,@sex,@classname)", cnn)
Dim cmdParent As New SqlCommand("insert into parent(name,sex,salary) values(@name,@sex,@salary)", cnn)
Dim cmdGetStudentid As New SqlCommand("select studentid from student where name=@name ", cnn)
Dim cmdGetParentid As New SqlCommand("select parentid from parent where name=@name", cnn)
Dim cmdStudentParent As New SqlCommand("insert into studentparent(studentid,parentid)values(@studentid,@parentid)", cnn)

cmdStudent.Parameters.Add("@name", student.Name)
cmdStudent.Parameters.Add("@sex", student.Sex)
cmdStudent.Parameters.Add("@classname", student.ClassName)

cmdParent.Parameters.Add("@name", parent.Name)
cmdParent.Parameters.Add("@sex", parent.Sex)
cmdParent.Parameters.Add("@salary", parent.Salary)

cmdGetStudentid.Parameters.Add("@name", student.Name)

cmdGetParentid.Parameters.Add("@name", parent.Name)

Dim transaction As SqlTransaction

Try
cnn.Open()
transaction = cnn.BeginTransaction
cmdStudent.Transaction = transaction
cmdParent.Transaction = transaction
cmdGetStudentid.Transaction = transaction
cmdGetParentid.Transaction = transaction
cmdStudentParent.Transaction = transaction
Dim studentid, parentid As Integer

cmdStudent.ExecuteNonQuery()
cmdParent.ExecuteNonQuery()
studentid = cmdGetStudentid.ExecuteScalar
parentid = cmdGetParentid.ExecuteScalar
cmdStudentParent.Parameters.Add("@studentid", studentid)
cmdStudentParent.Parameters.Add("@parentid", parentid)
cmdStudentParent.ExecuteNonQuery()

transaction.Commit()

Catch ex As Exception
transaction.Rollback()
success = False
MessageBox.Show(ex.Message)
Finally

cnn.Close()
End Try
Return success


End Function

3>页面级别的事务处理,也称com级别的事务。
需要导入Imports System.Data.Sqlclient和Imports System.EnterpriseServices


'This function will add student's infomation and its parent's information concurrently !
'So we should use transaction !
Public Shared Function InsertInfo(ByVal student As clsStudent, ByVal parent As clsParent) As Boolean

Dim success As Boolean = True
Dim cmdStudent As New SqlCommand("insert into student(name,sex,classname) values(@name,@sex,@classname)", cnn)
Dim cmdParent As New SqlCommand("insert into parent(name,sex,salary) values(@name,@sex,@salary)", cnn)
Dim cmdGetStudentid As New SqlCommand("select studentid from student where name=@name ", cnn)
Dim cmdGetParentid As New SqlCommand("select parentid from parent where name=@name", cnn)
Dim cmdStudentParent As New SqlCommand("insert into studentparent(studentid,parentid)values(@studentid,@parentid)", cnn)

cmdStudent.Parameters.Add("@name", student.Name)
cmdStudent.Parameters.Add("@sex", student.Sex)
cmdStudent.Parameters.Add("@classname", student.ClassName)

cmdParent.Parameters.Add("@name", parent.Name)
cmdParent.Parameters.Add("@sex", parent.Sex)
cmdParent.Parameters.Add("@salary", parent.Salary)

cmdGetStudentid.Parameters.Add("@name", student.Name)

cmdGetParentid.Parameters.Add("@name", parent.Name)

Dim transaction As SqlTransaction

Try
cnn.Open()
Dim studentid, parentid As Integer

cmdStudent.ExecuteNonQuery()
cmdParent.ExecuteNonQuery()
studentid = cmdGetStudentid.ExecuteScalar
parentid = cmdGetParentid.ExecuteScalar
cmdStudentParent.Parameters.Add("@studentid", studentid)
cmdStudentParent.Parameters.Add("@parentid", parentid)
cmdStudentParent.ExecuteNonQuery()

ContextUtil.SetComplete()

Catch ex As Exception
success = False
ContextUtil.SetAbort()
MessageBox.Show(ex.Message)
Finally

cnn.Close()
End Try
Return success

End Function
注:运用ContextUtil的静态方法SetComplete和SetAbort来提交和回滚。



收藏】 【评论】 【推荐】 【投稿】 【打印】 【关闭
发表评论
要记得去论坛讨论,点击注册新会员匿名评论
评论内容:不能超过250字,需审核后才会公布,请自觉遵守互联网相关政策法规。
阅读排行
随机推荐
实用信息推荐