木子屋
 

标题: 什么时候需要事务处理

作者: dnawo

日期: 2006-12-04 08:09 PM

分类: Web编程

内容: 昨天对事务处理进行了深入的了解一番，之后突然冒出一个问题：什么时候需要事务处理？众所周知，使用事务处理能使一系列操作"同生共死"，在很在程度上保证了程序的可用性，但却不能因此而滥用，如下程序：
<%
Dim conn,sqlstr
Set conn=server.createobject("ADODB.connection")
Conn.connectionstring="provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("db1.mdb")
Conn.open
sqlstr="insert into test(name) values('aaa')"
On error resume next
Conn.BeginTrans
conn.execute(sqlstr)
If err.number = 0 then
Conn.CommitTrans
Response.write ""
Else
Conn.RollbackTrans
Response.write ""
End if
On Error GoTo 0
Conn.close
Set conn=nothing
%>
整个过程只有一个操作，在此段程序中，事务处理完全是形同虚设，完全可以除去，再看下边这段程序：
<%
Dim conn,sqlstr,sqlstr2,sqlstr3
Set conn=server.createobject("ADODB.connection")
Conn.connectionstring="provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("db1.mdb")
Conn.open
sqlstr="insert into test(name) values('aaa')"      '正确的SQL语句
sqlstr2="insert into test(name2) values('bbb')"  '错误的SQL语句
sqlstr3="insert into test(name) values('ccc')"    '正确的SQL语句
On error resume next
Conn.BeginTrans
conn.execute(sqlstr)
conn.execute(sqlstr2)
conn.execute(sqlstr3)
If err.number = 0 then
Conn.CommitTrans
Response.write ""
Else
Conn.RollbackTrans
Response.write ""
End if
On Error GoTo 0
Conn.close
Set conn=nothing
%>
当执行第二条错误的SQL语句时，第二个操作失败，事务处理机制生效，第一个操作也随之无效，在此，事务处理起到了作用。
可见，事务处理只有用在一系列有关系的操作时方能显示出其作用，对于单个操作没有实际的意义。

+ 查看当前日志评论 (1)

 

登录

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.031 ms

标题: 什么时候需要事务处理

你没有权限发表评论

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.047 ms

暂无评论

返回

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.047 ms