トランザクション処理によりデータベースの更新が複数ある場合など
開始宣言をし、全て完了した場合に更新、または例外発生時には全てキャンセルします。
（コミットorロールバック）
自分の備忘としてまとめておきます。
トランザクションの処理手順
１．トランザクションを開始
２．処理（SQL発行）
３．トランザクションを実行またはキャンセル
４．正常にトランザクションが終了した場合、ＤＢにコミット
５．異常が発生し処理をキャンセルした場合はトランザクションを開始する前の状態にロールバック。
以下、簡単な流れだけ書きます。
Sub Main()
Dim con As New SqlConnection
‘DB接続
con.ConnectionString = “”
con.Open()
‘トランザクションの開始
Dim tran As SqlTransaction = Nothing
tran = con.BeginTransaction
Try
‘SQLなどの処理
‘～～～～～～～
‘コミット
tran.Commit()
Console.WriteLine(“更新完了”)
Catch ex As Exception
‘ロールバック
If tran IsNot Nothing Then
tran.Rollback()
End If
Console.WriteLine(“データの更新を取消しました”)
Finally
‘接続を閉じる
If Not con.State = ConnectionState.Closed Then
con.Close()
End If
‘リソースの解放
da.Dispose()
tran.Dispose()
con.Dispose()
End Try
End Sub
Dim con As New SqlConnection
‘DB接続
con.ConnectionString = “”
con.Open()
‘トランザクションの開始
Dim tran As SqlTransaction = Nothing
tran = con.BeginTransaction
Try
‘SQLなどの処理
‘～～～～～～～
‘コミット
tran.Commit()
Console.WriteLine(“更新完了”)
Catch ex As Exception
‘ロールバック
If tran IsNot Nothing Then
tran.Rollback()
End If
Console.WriteLine(“データの更新を取消しました”)
Finally
‘接続を閉じる
If Not con.State = ConnectionState.Closed Then
con.Close()
End If
‘リソースの解放
da.Dispose()
tran.Dispose()
con.Dispose()
End Try
End Sub
