SetCommandsTransaction – Assign a transaction to the DataAdapter’s commands

SetCommandsTransaction – Assign a transaction to the DataAdapter’s commands

' Assign the same transaction to the Update/Delete/Insert commands of all the ' OleDb/SqlAdapters passed in input' Note: all the DataAdapters must be of the same type (OleDb or Sql)' Note: requires Imports System.Data.OleDb and Imports System.Data.SqlClient'' Example: SetCommandsTransaction(tran, da1, da1)Sub SetCommandsTransaction(ByVal tran As IDbTransaction, _    ByVal ParamArray adapters() As IDataAdapter)    If adapters.Length = 0 Then Return    If TypeOf adapters(0) Is OleDbDataAdapter Then        Dim daOledb As OleDbDataAdapter        For Each daOledb In adapters            If Not daOledb.UpdateCommand Is Nothing Then _                daOledb.UpdateCommand.Transaction = tran            If Not daOledb.InsertCommand Is Nothing Then _                daOledb.InsertCommand.Transaction = tran            If Not daOledb.DeleteCommand Is Nothing Then _                daOledb.DeleteCommand.Transaction = tran        Next    ElseIf TypeOf adapters(0) Is SqlDataAdapter Then        Dim daSql As SqlDataAdapter        For Each daSql In adapters            If Not daSql.UpdateCommand Is Nothing Then _                daSql.UpdateCommand.Transaction = tran            If Not daSql.InsertCommand Is Nothing Then _                daSql.InsertCommand.Transaction = tran            If Not daSql.DeleteCommand Is Nothing Then _                daSql.DeleteCommand.Transaction = tran        Next    End IfEnd Sub

See also  Why ChatGPT Is So Important Today

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist