public void RunUniTransaction(string myConnString) { UniConnection myConnection = new UniConnection(myConnString); myConnection.Open(); UniCommand myCommand = new UniCommand(); myCommand.Connection = myConnection; myConnection.BeginTransaction(); try { myCommand.CommandText = "INSERT INTO Test.Dept(DeptNo, DName) Values(50, 'DEVELOPMENT')"; myCommand.ExecuteNonQuery(); myCommand.CommandText = "INSERT INTO Test.Dept(DeptNo, DName) Values(60, 'PRODUCTION')"; myCommand.ExecuteNonQuery(); myConnection.Commit(); Console.WriteLine("Both records are written to database."); } catch(Exception e) { myConnection.Rollback(); Console.WriteLine(e.ToString()); Console.WriteLine("Neither record was written to database."); } finally { myConnection.Close(); } }
Public Sub RunUniTransaction(myConnString As String) Dim myConnection As New UniConnection(myConnString) myConnection.Open() Dim myCommand As New UniCommand() myCommand.Connection = myConnection myConnection.BeginTransaction() Try myCommand.CommandText = "INSERT INTO Test.Dept(DeptNo, DName) Values(50, 'DEVELOPMENT')" myCommand.ExecuteNonQuery() myCommand.CommandText = "INSERT INTO Test.Dept(DeptNo, DName) Values(60, 'PRODUCTION')" myCommand.ExecuteNonQuery() myConnection.Commit() Console.WriteLine("Both records are written to database.") Catch e As Exception myConnection.Rollback() Console.WriteLine(e.ToString()) Console.WriteLine("Neither record was written to database.") Finally myConnection.Close() End Try End Sub
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2