當(dāng)大量的對(duì)數(shù)據(jù)庫(kù)進(jìn)行插入，修改，刪除等操作時(shí)，如果要實(shí)現(xiàn)事務(wù)，可以用以下代碼。如：
<%@ TRANSACTION = Required%>
On Error Resume Next
strSql1="insert into a(num) values(1)"
strSql2="insert into a(num) values('a')"
'執(zhí)行第一個(gè)sql語(yǔ)句
'執(zhí)行第二個(gè)sql語(yǔ)句
'如果不用到事務(wù)，則第一個(gè)sql語(yǔ)句會(huì)提交到數(shù)據(jù)庫(kù)中。
'另外經(jīng)查看數(shù)據(jù)庫(kù)發(fā)現(xiàn)，數(shù)據(jù)庫(kù)的事務(wù)回滾其實(shí)是執(zhí)行相對(duì)應(yīng)的反操作。執(zhí)行insert，則在回滾里會(huì)執(zhí)行delete操作。可以通過(guò)觀看主鍵id的變化得到。
If Err Then
      ObjectContext.SetAbort '通知所有支持事務(wù)的組件回滾
Else
      ObjectContext.SetComplete
End If
Sub OnTransactionAbort
      Response.Write "錯(cuò)誤"
     '注意如果在前面用到了一些非數(shù)據(jù)庫(kù)方面的操作，如文件操作，建立文件，刪除文件等。需要在此加上文件的回滾操作。前面建立文件，則在此需要相應(yīng)的刪除文件。
End Sub
Sub OnTransactionCommit
     Response.Write "成功"
End Sub