Transaction Commit Demo : Transaction « Database ADO.net « VB.Net

1. VB.Net
2. Database ADO.net
3. Transaction

Transaction Commit Demo

Imports System
Imports System.Data
Imports System.Data.SqlClient


public class MainClass
   Shared Sub Main()
      Dim thisConnection As New SqlConnection("server=(local)\SQLEXPRESS;" & _
          "integrated security=sspi;database=MyDatabase")

      ' SQL Delete Commands
      Dim sql1 As String = "DELETE FROM Employee " & _
         "WHERE ID = 10" 

      Dim sql2 As String = "DELETE FROM Employee " & _
         "WHERE ID = 9"

      ' Create command
      Dim thisCommand As New SqlCommand(sql1, thisConnection)

      ' Create Transaction
      Dim thisTransaction As SqlTransaction

      Try
         ' Open Connection
         thisConnection.Open()

         ' Begin transaction and attach it to command
         thisTransaction = thisConnection.BeginTransaction()
         thisCommand.Transaction = thisTransaction

         ' Run first delete command
         thisCommand.ExecuteNonQuery()

         ' Setup and run second delete command
         thisCommand.CommandText = sql2
         thisCommand.ExecuteNonQuery()

         ' Commit transaction
         thisTransaction.Commit()

         Console.WriteLine("Transaction Committed. Data Deleted")

      Catch ex As Exception
         ' Roll back transaction
         thisTransaction.Rollback()

         Console.WriteLine("Transaction rolled back : " & ex.Message)

      Finally
         thisConnection.Close()

      End Try
   End Sub
End Class

           
       

Related examples in the same category

1.	Simple Transaction Commit and RollBack: SqlTransaction has completed; it is no longer usable.
2.	Transaction save point and roll back
3.	Transaction Rollback Demo
4.	DataSet transaction
5.	Isolation Level ReadUncommitted