<p> 在编程中,经常需要使用事务。所谓事务,就是一系列必须都成功的操作,只要有一步操作失败,所有其他的步骤也必须撤销。比如用ASP开发一个网络硬盘系统,其用户注册部分要做的事有:</p><p> 将用户信息记入数据库</p><p> 为用户开个文件夹用于存储</p><p> 初始化用户操作日志</p><p> 这三步必须使用事务,否则万一磁盘操作失败,而没有撤销数据库操作,就会造成只能登陆而不能操作的“死用户”现象。</p><p> 由于数据库系统特殊的发展历史,小至Access,大到DB2,无不带有事务支持。因此上述步骤可以如下表示:</p><p> <code>On Error Resume Next<br /> 第一步:<br /> 在事务环境下把用户信息记入数据库<br /> If Err Then<br /> 关闭连接<br /> 退出<br /> Else<br /> 第二步:创建文件夹<br /> If Err Then<br /> 回滚第一步数据库操作,退出<br /> Else<br /> 第三步:在事务环境下操作日志数据库<br /> If Err Then<br /> 回滚第一步操作,删除第二步建立的文件夹<br /> 退出<br /> End If<br /> End If<br />End If<br /> 提交第一步数据库操作的事务<br /> 提交第二步数据库操作的事务<br />End </code></p><p> 每一步都需要进行判断,如果失败,还需要手工回滚前面多步操作,使程序变得复杂、难懂。如果今后更新了程序,增加其他步骤,还需要嵌套更多层的If...Else...End If,使程序流程更加复杂。</p><p> 正确的解决办法是使用ASP的事务控制功能。IIS通过和MTS服务联系,可以控制多种支持事务的系统,当程序发出“失败”的信号时,所有支持事务的系统均将自动回滚,即使操作已经正式完成;对不支持事务的操作也提供了方便的手工回滚方式。上面的例子用ASP事务控制功能重写如下:</p><p> <code><%@ TRANSACTION = Required %><br />On Error Resume Next<br />Set Conn=Server.CreateObject("ADODB.Connection")<br />Conn.Open ....<br />Conn.Execute "INSERT...."<br />Conn.Close<br />Set Conn=Nothing<br />Set Conn2=Server.CreateObject("ADODB.Connection")<br />Conn2.Open ....<br />Conn2.Execute "INSERT...."<br />Conn2.Close<br />Set Conn2=Nothing<br />Set FSO=Server.CreateObject("Scripting.FilesystemObject")<br />FSO.CreateFolder "...."<br />If Err Then<br />ObjectContext.SetAbort '通知所有支持事务的组件回滚,并运行手工回滚代码<br />Else<br />ObjectContext.SetComplete<br />End If<br />Set FSO=Nothing<br />Sub OnTransactionAbort<br />Response.Write "错误"<br />FSO.DeleteFile Server.Mappath("a.txt") 'FSO的手工回滚――删除文件夹<br />End Sub<br />Sub OnTransactionCommit<br />Response.Write "胜利完成任务"<br />End Sub<br />%></code></p><p> 第一行的<%@ TRANSACTION = Required %>表示这一页ASP文件需要MTS的事务支持。中间的各个操作都按普通顺序书写,而不用考虑回滚问题。在程序最后判断是否有错误。如果有,调用ObjectContext的SetAbort方法,IIS会通过MTS服务通知所有支持事务的组件回滚(主要是数据库),并且运行Sub OnTransactionAbort对不支持事务的操作手工回滚;如果没有发生错误,调用ObjectContext的SetComplete方法,则会运行Sub OnTransactionCommit来显示成功的消息。</p><p> 整个ASP程序不需要为判断错误和回滚操作书写多余的代码,只须在最后进行判断,即使今后增加了多步操作,也只需要在Sub OnTransactionAbort中进行控制即可,非常方便,程序员可以专注于过程编写而不是书写纠错代码。</p><p> 其实ASP还提供了许多更有用的功能,等着我们使用,千万不要以为ASP使用脚本语言,功能就一定弱。</p>