欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

<%
‘a(chǎn)sp事務(wù)處理。
‘測試數據庫為sql server，服務(wù)器為本機，數據庫名為test，表名為a，兩個(gè)字段id(int)主鍵標識,num(int)
set conn=server.CreateObject("adodb.connection")
strConn="provider=sqloledb.1;persist security info=false;uid=sa;pwd=sa;Initial Catalog=test;Data Source=."
conn.Open strConn
‘以上代碼建立數據庫連接
conn.BeginTrans ‘事務(wù)開(kāi)始
strSql1="update a set num=1000 where id=24" ‘第一個(gè)sql語(yǔ)句為update。（語(yǔ)法正確）
strSql2="insert into a(num) values(‘a(chǎn)‘)" ‘第二個(gè)sql語(yǔ)句為錯誤的sql語(yǔ)句
strSql3="insert into a(num) values(33333)" ‘第三個(gè)sql語(yǔ)句為正確的sql語(yǔ)句

call conn.execute(strSql1)  
call conn.execute(strSql2)  
call conn.execute(strSql3)  

if conn.Errors.Count=0 then  
      conn.CommitTrans  ‘如果沒(méi)有conn錯誤，則執行事務(wù)提交
else
      conn.RollbackTrans ‘否則回滾
end if
%>
以上代碼經(jīng)調試，可以正常的進(jìn)行事務(wù)處理。但是有時(shí)候，我們并不想將編譯錯誤顯示給用戶(hù)。
則我們需要在conn.BeginTrans后面加上On error resume next
但是因為用到了On error resume next。conn.Errors.Count只能獲得最后一個(gè)數據庫操作的conn返回的結果 。上面的三個(gè)sql語(yǔ)句，因為最后一個(gè)sql語(yǔ)句是正確的，則此事務(wù)處理就無(wú)效了。那我們需要對出錯處理作出相對應的修改。
if conn.Errors.Count=0 then應該改為if err.number=0 then
這樣，我們可以在數據庫回滾后同時(shí)做出其他相對應的操作或者提示。修改后的代碼如下：
<%
set conn=server.CreateObject("adodb.connection")
strConn="provider=sqloledb.1;persist security info=false;uid=sa;pwd=sa;Initial Catalog=test;Data Source=."
conn.Open strConn
‘以上代碼建立數據庫連接
conn.BeginTrans ‘事務(wù)開(kāi)始
on error resume next ‘增加的代碼
strSql1="update a set num=1000 where id=24" ‘第一個(gè)sql語(yǔ)句為update。（語(yǔ)法正確）
strSql2="insert into a(num) values(‘a(chǎn)‘)" ‘第二個(gè)sql語(yǔ)句為錯誤的sql語(yǔ)句
strSql3="insert into a(num) values(33333)" ‘第三個(gè)sql語(yǔ)句為正確的sql語(yǔ)句

call conn.execute(strSql1)  
call conn.execute(strSql2)  
call conn.execute(strSql3)  

if err.number =0 then  
    conn.CommitTrans  ‘如果沒(méi)有conn錯誤，則執行事務(wù)提交
else
    conn.RollbackTrans ‘否則回滾
    ‘回滾后的其他操作
    strerr=err.Description
    Response.Write "數據庫錯誤！錯誤日志：<font color=red>"&strerr &"</font>"
    Response.End
end if

%>