欢迎光临
我们一直在努力

在ASP程序中实现数据库事务控制-ASP教程,ASP技巧

建站超值云服务器,限时71元/月

在编程中,经常需要使用事务。所谓事务,就是一系列必须都成功的操作,只要有一步操作失败,所有其他的步骤也必须撤销。比如用asp开发一个网络硬盘系统,其用户注册部分要做的事有:

  将用户信息记入数据库
  为用户开个文件夹用于存储
  初始化用户操作日志

  这三步必须使用事务,否则万一磁盘操作失败,而没有撤销数据库操作,就会造成只能登陆而不能操作的“死用户”现象。

  由于数据库系统特殊的发展历史,小至access,大到db2,无不带有事务支持。因此上述步骤可以如下表示:

on error resume next

  第一步:

  在事务环境下把用户信息记入数据库

  if err then
   关闭连接
   退出
  else
   第二步:创建文件夹
  if err then
   回滚第一步数据库操作,退出
  else
   第三步:在事务环境下操作日志数据库
  if err then
   回滚第一步操作,删除第二步建立的文件夹
   退出
  end if
 end if
end if
 提交第一步数据库操作的事务
 提交第二步数据库操作的事务
end 

  每一步都需要进行判断,如果失败,还需要手工回滚前面多步操作,使程序变得复杂、难懂。如果今后更新了程序,增加其他步骤,还需要嵌套更多层的if…else…end if,使程序流程更加复杂。

  正确的解决办法是使用asp的事务控制功能。iis通过和mts服务联系,可以控制多种支持事务的系统,当程序发出“失败”的信号时,所有支持事务的系统均将自动回滚,即使操作已经正式完成;对不支持事务的操作也提供了方便的手工回滚方式。上面的例子用asp事务控制功能重写如下:

<%@ transaction = required %>
on error resume next

set conn=server.createobject(“adodb.connection”)
conn.open ….
conn.execute “insert….”
conn.close
set conn=nothing

set conn2=server.createobject(“adodb.connection”)
conn2.open ….
conn2.execute “insert….”
conn2.close
set conn2=nothing

set fso=server.createobject(“scripting.filesystemobject”)
fso.createfolder “….”

if err then
objectcontext.setabort 通知所有支持事务的组件回滚,并运行手工回滚代码
else
objectcontext.setcomplete
end if
set fso=nothing

sub ontransactionabort
response.write “错误”
fso.deletefile server.mappath(“a.txt”) fso的手工回滚——删除文件夹
end sub
sub ontransactioncommit
response.write “胜利完成任务”
end sub
%>

  第一行的<%@ transaction = required %>表示这一页asp文件需要mts的事务支持。中间的各个操作都按普通顺序书写,而不用考虑回滚问题。在程序最后判断是否有错误。如果有,调用objectcontext的setabort方法,iis会通过mts服务通知所有支持事务的组件回滚(主要是数据库),并且运行sub ontransactionabort对不支持事务的操作手工回滚;如果没有发生错误,调用objectcontext的setcomplete方法,则会运行sub ontransactioncommit来显示成功的消息。

  整个asp程序不需要为判断错误和回滚操作书写多余的代码,只须在最后进行判断,即使今后增加了多步操作,也只需要在sub ontransactionabort中进行控制即可,非常方便,程序员可以专注于过程编写而不是书写纠错代码。

  其实asp还提供了许多更有用的功能,等着我们使用,千万不要以为asp使用脚本语言,功能就一定弱。

赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » 在ASP程序中实现数据库事务控制-ASP教程,ASP技巧
分享到: 更多 (0)