|
| |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
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来提交和回滚。 返回类别: 教程 上一教程: 使用 ASP+ 列表绑定控件(中) 下一教程: 利用反射,实现动态调用winform窗体!! 您可以阅读与".net 中的事务总结"相关的教程: · 将ASP.net中的Table中的数据导入到Execl · Dotnet总结(4)--xml读写 · .NET中的设计模式五:观察者模式 · .Net 下对SqlServer2000中的存储过程的调用 · .NET中的版本号 |
| 快精灵印艺坊 版权所有 |
首页 |
||