CommitTrans
トランザクションをコミットして終了
文法
Connectionオブジェクト.CommitTrans
機能説明
トランザクションをコミットし終了
AttributesでadXactCommitRetainingが設定されていると、自動でトランザクションが開始
使用例
<%
Dim objConn, objRS
'データベース接続
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "test"
'トランザクション開始
objConn.BeginTrans
objRS = objConn.Execute("select * from test")
Response.Write "処理前 : " & objRS(0)
'データ追加
objConn.Execute("insert into test(name,status) values('渡部','LowTension')")
'コミット発行
objConn.CommitTrans
objRS = objConn.Execute("select * from test")
Response.Write "処理後 : " & objRS(0)
'オブジェクト開放
objRS.Close
objConn.Close
Set objRS = Nothing
Set objConn = Nothing
%>
Topへ