当大量的对数据库进行插入，修改，删除等操作时，如果要实现事务，可以用以下代码。如：
<%@ TRANSACTION = Required%>
On Error Resume Next
strSql1="insert into a(num) values(1)"
strSql2="insert into a(num) values(\'a\')"
\'执行第一个sql语句
\'执行第二个sql语句
\'如果不用到事务，则第一个sql语句会提交到数据库中。
\'另外经查看数据库发现，数据库的事务回滚其实是执行相对应的反操作。执行insert，则在回滚里会执行delete操作。可以通过观看主键id的变化得到。
If Err Then
ObjectContext.SetAbort \'通知所有支持事务的组件回滚
Else
ObjectContext.SetComplete
End If
Sub OnTransactionAbort
Response.Write "错误"
\'注意如果在前面用到了一些非数据库方面的操作，如文件操作，建立文件，删除文件等。需要在此加上文件的回滚操作。前面建立文件，则在此需要相应的删除文件。
End Sub
Sub OnTransactionCommit
Response.Write "成功"
End Sub