ASP中事务处理资料收集
生活随笔
收集整理的這篇文章主要介紹了
ASP中事务处理资料收集
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
在IIS ? 中，ASP結構提供了六個內建對象， ? 內建對象的特殊性在于，它們在 ? ASP ? 頁內生成且在腳本中使用它們前無須創建。其中，內建對象ObjectContext專門用于支持開發基于Microsoft ? Transaction ? Server（MTS）的事務型Web應用軟件。 ? ?
? 1.ASP事務處理基本原理 ? ?
? ASP ? 事務處理是以Microsoft ? Transaction ? Server（簡稱MTS）為基礎的。MTS ? 是一個運行于Windows ? NT環境下的事務處理系統，用于開發、配置和管理高性能、可分級的、有魯棒性的企業 ? Internet ? 和 ? Intranet ? 服務器應用程序。MTS為開發分布式的，基于組件的應用程序提供了一個應用程序設計模型，它也為配置和管理這些應用程序提供了一個運行環境。 ? ?
? 創建事務性腳本的功能內置在 ? Internet ? Information ? Server中。如果您安裝了 ? Microsoft ? Transaction ? Server，就可以將組件打包，以使組件在事務內部運行。 ? ?
? 事務是整體成功或失敗的操作，事務處理常用于對數據庫進行可靠地更新。在對數據庫進行許多相關更改或同時更新多個數據庫時，要保證所有更改都被正確執行。如果這些更改中的任何一個失敗，都需要恢復數據庫表的原始狀態。 ? ?
? 如果沒有 ? MTS，您就需要編寫腳本和組件，手工跟蹤請求的更改情況，以便在某些更改失敗時恢復數據。使用 ? MTS，您只需簡單的將您的腳本和組件聲明為“需要事務”并讓 ? MTS ? 處理事務的一致性。事務處理只適用于數據庫訪問；MTS ? 不能對文件系統或其他的非事務性資源的更改進行恢復操作。應用程序所訪問的數據庫必須為 ? MTS ? 所支持。目前，MTS ? 支持 ? Microsoft ? SQL ? Server ? 及任何支持 ? XA ? 協議（由 ? X/Open ? 協會制定）的服務器。MTS ? 將繼續擴展對其他數據庫的支持。 ? ?
? 事務不能跨越多個 ? ASP ? 頁。如果一個事務需要來自多個組件的對象，則須將使用這些對象的操作組合在一個 ? ASP ? 頁中。例如，假定有一個組件用于更新工資單數據庫，還有一個組件用于更新人力資源數據庫中的員工記錄。為了記錄一個員工的新的工資信息，您需要編寫這樣一個腳本，該腳本在一個事務環境中調用這兩個組件，一個用于更新工資單數據庫，另一個用于更新人力資源數據庫中的員工等級。 ? ?
? ?
? 2.在ASP腳本中編寫事務型應用 ? ?
? 1. ? 聲明事務性腳本 ? ?
? 在將一個ASP頁聲明為事務性時，此頁中的任何腳本命令和對象都運行在同一個事務環境中，MTS處理生成事務的細節并決定事務成功（提交）或失敗（終止）。要將某個頁聲明為事務性，可在頁首添加 ? @TRANSACTION ? 指令： ? ?
? ?
? value ? 參數可以是下列之一： ? ?
? Requires_New ? ：啟動一個新的事務。 ? ?
? Required ? ： ? 啟動一個新的事務。 ? ?
? Supported： ? 不啟動事務。 ? ?
? Not_Supported： ? 不啟動事務。 ? ?
? @TRANSACTION ? 指令必須在一頁中的第一行，否則將產生錯誤。必須將該指令添加到需要在事務下運行的每一頁中。當腳本處理結束時，當前事務即告結束。 ? ?
? 如果事務被終止，MTS將恢復對支持事務的資源的任何更改。目前，僅數據庫服務器完全支持事務，因為數據庫中的數據對于企業應用是最為關鍵的。MTS不對硬盤上的文件、會話和應用程序的變量、集合等的改變進行恢復，然而您可以如下文所述，通過編寫事務事件來編寫恢復變量和集合的腳本。在某些時候，您的腳本也可以顯式的提交或終止一個事務，如向文件寫數據失敗時。 ? ?
? 2. ? 提交或終止腳本 ? ?
? 利用 ? ObjectContext ? 對象可以提交或放棄一項由MTS管理的事務，為此，ObjectContext ? 對象提供了兩個方法： ? ?
? (1)SetComplete ? 方法 ? ?
? 聲明腳本不了解事務未完成的原因。如果事務中的所有組件都調用 ? SetComplete，事務將完成。 ? ?
? (2)SetAbort ? 方法 ? ?
? 聲明被腳本初始化的事務未完成，無法更新源。 ? ?
? 示例： ? ?
? <%@ ? Transaction ? = ? Required ? %> ?
? <% ?
? Set ? CurrentQOB ? = ? Server.CreateObject("Mylib. ? Inventory") ? ' ? 創建Inventory對象 ?
? Set ? CurrentBorrow ? = ? Server.CreateObject ? ("Mylib.Borrow") ? ' ? 創建Borrow對象 ?
? CheckQuantity ? = ? Request.Form("QuantityTo ? Borrow") ?
? CheckBook ? = ? Request.Form("BookCode") ?
? QuantityStatus ? = ? CurrentQOB.CheckQOB ? (CheckQuantity,CheckBook)'檢查存書量 ?
? If ? QuantityStatus ? = ? None ? '如果存書量不足 ?
? ObjectContext.SetAbort ? '終止事務 ?
? Response.Write ? "對不起，存書量不足！" ?
? Else'如果存書量充足 ?
? ObjectContext.SetComplete ? '繼續執行事務 ?
? Account ? = ? Request.Form("AccountIn") ?
? Saleupdate ? = ? CurrentBorrow.PostIt(Account) ?
? End ? If ?
? %> ?
? ?
? ?
? 這里示范使用 ? SetAbort ? 和SetComplete ? 的方法。假設有一個網上有償借閱圖書館的主頁，其中，BorrowBookData.htm ? 文件獲取處理借閱圖書請求所需的數據。第二個文件BorrowVerify.asp ? 中的腳本使用兩個對象Inventory ? 和 ? Borrow ? 來處理借閱（注意，在本文所舉的例子中，使用了一些作者自己開發的Web服務器端ActiveX組件對象，如對象Inventory ? 和 ? Borrow等，在實際應用中，這些組件對象需由讀者自行開發）。如果 ? Inventory ? 返回了錯誤代碼表示存書不足，就會調用 ? SetAbort。如果 ? Inventory ? 對象沒有返回錯誤代碼，將會調用 ? SetComplete ? 處理借閱請求。 ? ?
? BorrowBookData.htm ? 源文件： ? ?
? ?
? ?
? <%@ ? TRANSACTION ? = ? Required ? %> ?
? <%Response.Buffer ? = ? True ? '緩存輸出 ? %> ?
? <HTML> ?
? <BODY> ?
? <H1>網上有償借閱圖書館</H1> ?
? <% ? ' ? 創建作者自己開發的ActiveX組件對象 ?
? Set ? LibAction ? = ? Server.CreateObject ? ("MyExample.LibComponent") ?
? ' ? 根據借閱者輸入的帳戶、密碼進行業務處理 ?
? LibAction.Borrow(Request.Form("Account ? Num"),Request.Form("Password")) ?
? %> ?
? </BODY> ?
? </HTML> ?
? <% ? ' ? 如果借閱者帳戶有效顯示下頁 ?
? Sub ? OnTransactionCommit() ?
? Response.Write ? "<HTML>" ?
? Response.Write ? "<BODY>" ?
? Response.Write ? "帳戶有效！" ?
? Response.Write ? "</BODY>" ?
? Response.Write ? "</HTML>" ?
? Response.Flush() ?
? End ? sub ? %> ?
? <% ? ' ? 如果借閱者帳戶無效顯示下頁 ?
? Sub ? OnTransactionAbort() ?
? Response.Clear() ?
? Response.Write ? "<HTML>" ?
? Response.Write ? "<BODY>" ?
? Response.Write ? "帳戶無效！" ?
? Response.Write ? "</BODY>" ?
? Response.Write ? "</HTML>" ?
? Response.Flush() ?
? End ? sub ? %> ?
? ?
? ?
? 3. ? 編寫事務事件 ? ?
? 腳本本身不能決定事務是成功還是失敗。但是，可以編寫提交或終止事務時被調用的事件。為此，ObjectContext ? 對象提供了兩個事件： ? ?
? (1)OnTransactionCommit ? 事件 ? ?
? 它在一個已處理的腳本事務提交后發生。該事件發生時，如果腳本中有 ? OnTransactionCommit ? 子例程，IIS ? 將處理該子例程。 ? ?
? (2)OnTransactionAbort ? 事件 ? ?
? 如果事務異常終止，就會發生該事件。當 ? OnTransactionAbort ? 事件發生時，如果腳本中有 ? OnTransactionAbort ? 子程序，則 ? IIS ? 將執行它。 ? ?
? 例如，假設有一個根據借閱者帳戶、密碼進行業務處理的腳本，并且您需要針對事務的不同狀態將不同的頁返回給用戶，那么就可以使用 ? OnTransactionCommit ? 和 ? OnTransactionAbort ? 事件來編寫對用戶的不同響應。?
_______________________
-------------------------------------------------------------------------------- ?
? ? 運氣 ? 于 ? 8/24/2001 ? 9:46:19 ? AM ? 加貼在 ? Joy ? ASP ? ←返回版面： ? ? ? ?
? 在開發Web應用時，無一例外地需要訪問數據庫，以完成對數據的查詢、插入、更新、刪除等操作。受應用邏輯的影響，有時需要將多條數據庫操作指令組成一個工作單元（事務）。在數據庫中，所謂事務是指一組邏輯操作單元，它使數據從一種狀態變換到另一種狀態。為確保數據庫中數據的一致性，應當用離散的成組的邏輯單元操作數據：當它全部完成時，數據的一致性可以保持；而當單元中的一部分操作失敗時，整個事務會被全部忽略，所有從起始點以后的操作全部退回到開始狀態。 ? ?
? 實際上，在默認方式下對數據庫的每一次操作都是隱含的事務處理。本文以一個典型的用戶注冊程序為例，介紹三種利用ASP實現事務處理的方法：基于ASP數據庫組件的解決方法、基于數據庫內部的事務處理機制的解決方法和基于MTS組件的解決方法。 ? ?
? ?
? 程序功能 ? ?
? 在SQL ? Server數據庫中建立兩個表：USER表和USERDOC表。其中USER表中存放的是注冊用戶的用戶名和密碼，USERDOC表中存放的是該注冊用戶的個人資料，并且以用戶名為索引。下面是表USER和USERDOC的定義： ? ?
? Create ? Table ? USER(userName ? varchar(30),userPasswd ? varchar(30)) ? ?
? Create ? Table ? USERDOC(userName ? varchar(30),Age ? int,Sex ? int,PhoneNumber ? varchar(20),Address ? varchar(50)) ? ?
? 當用戶請求注冊時，ASP腳本先將用戶名和密碼插入到USER表中，然后在USERDOC表中插入用戶個人信息（年齡、性別、聯系電話和家庭住址等）。同時，應用程序還必須保證USER表中的每一條記錄在USERDOC表中都有相應的記錄。 ? ?
? 方法一 ? ?
? 利用ASP內置ADO組件中的Connection對象可以實現對數據庫操作的事務性處理。Connection對象的部分方法如下： ? ?
? ●Connection.BeginTrans方法：啟動一個事務； ? ?
? ●Connection.CommitTrans方法：完成/提交一個事務； ? ?
? ●Connection.RollBackTrans方法：撤消/放棄一個事務。 ? ?
? //啟動一個事務操作 ? ?
? <％ ? Conn.BeginTrans ? ％> ? ? ?
? <％ ? sqlText=“Insert ? into ? USER(userName,userPasswd) ? values(‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“usrName”) ? ＆ ? “’，‘”＆request(“usrPasswd”)＆“’) ? ” ? ％> ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? //如果插入數據操作失敗，則事務向前回滾 ? ?
? <％ ? conn.RollBackTrans ? ％> ? ? ?
? <％ ? response.Redirct ? RegisterFail.html ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? <％ ? sqlText=“Insert ? into ? USERDOC(userName,Age,Sex,PhoneNumber,Address) ? ”％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “values(‘”＆ ? request ? ?
? (“usrName”) ? ＆ ? “’, ? ” ? ＆ ? request(“Age”) ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “,‘” ? ＆ ? request ? ?
? (“PhoneNum”) ? ＆ ? “’,‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“Address”) ? ＆ ? “’) ? ” ? ％> ? ?
? //執行事務單元中的第二條插入語句 ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? //如果操作失敗，則事務向前回滾 ? ?
? <％ ? conn.RollBackTrans ? ％> ? ? ?
? <％ ? response.Redirct ? RegisterFail.html ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? //如果整個事務操作執行正確，則提交事務 ? ?
? <％ ? Conn.CommitTrans ? ％> ? ? ?
? //轉向注冊成功處理頁面 ? ?
? <％ ? response.Redirct ? RegisterOk.html ? ％> ? ? ?
? 方法二 ? ?
? 可以利用數據庫系統內部的事務處理機制，通過在數據庫服務器中編寫包含事務的存儲過程，完成對數據操作的事務處理。同時，利用ADO組件調用存儲過程，還可以根據存儲過程的返回代碼判斷事務處理是否執行成功。 ? ?
? 在數據庫系統中，每一條SQL語句都是一個事務。因此可以保證每條語句要么完成，要么退回到開始之處。但是如果希望一組SQL語句的操作要么全部完成，要么全部無效，就需要利用數據庫的事務處理機制來實現。 ? ?
? 在數據庫中生成存儲過程的主要代碼如下： ? ?
? Create ? proc ? RegisterUser ? ?
? (@usrName ? varchar(30), ? @usrPasswd ? varchar(30),@age ? int, ? @PhoneNum ? varchar(20), ? @Address ? varchar(50) ? ) ? ?
? as ? ?
? begin ? ?
? //顯示定義并開始一個事務 ? ?
? begin ? tran ? ? ?
? insert ? into ? USER(userName,userPasswd) ? values(@usrName,@usrPasswd) ? ?
? if ? @@error<>0 ? ?
? begin ? ?
? //操作失敗，則事務回滾 ? ?
? rollback ? tran ? ? ?
? //返回存儲過程，并設置返回碼為事務操作失敗 ? ?
? return ? －1 ? ? ?
? end ? ?
? insert ? into ? USERDOC(userName,age,sex,PhoneNumber,Address) ? ? ?
? values(@Usrname,@age,@PhoneNum,@Address) ? ?
? if ? @@error<>0 ? ?
? begin ? ?
? //操作失敗，則事務回滾 ? ?
? rollback ? tran ? ? ?
? return ? －1 ? ?
? end ? ?
? //如果操作執行正確，則提交事務 ? ?
? commit ? tran ? ? ?
? return ? 0 ? ?
? end ? ?
? 在ASP腳本中調用數據庫存儲過程的主要代碼如下： ? ?
? <％ ? Set ? Comm=server.CreateObject ? ?
? (“ADODB.Command”) ? ％> ? ?
? <％ ? Set ? Comm.ActiveConnection=conn ? ％> ? ?
? <％ ? Comm.CommandType=adCmdStoredProc ? ％> ? ?
? <％ ? Comm.CommandText=“RegisterUser” ? ％> ? ?
? //創建存儲過程返回參數對象 ? ?
? <％ ? Set ? RetCode=Comm.CreateParameter ? ?
? (“RetCode”,adInteger,adParamReturnValue) ? ％> ? ? ?
? //創建存儲過程輸入參數對象 ? ?
? <％ ? Set ? usrName=Comm.CreateParameter ? ?
? (“usrName”,adVarchar,adParamInput,30) ? ％> ? ? ?
? <％ ? Set ? usrPwd=Comm.CreateParameter ? ?
? (“usrPasswd”,adVarchar,adParamInput,30) ? ％> ? ?
? <％ ? Set ? age=Comm.CreateParameter(“age”,adInteger,adParamInput) ? ％> ? ?
? <％ ? Set ? PhoneNum=Comm.CreateParameter ? ?
? (“PhoneNum”,adVarchar,adParamInput, ? 20) ? ％> ? ?
? <％ ? Set ? Address=Comm.CreateParameter(“Address”,adVarchar,adParamInput,50) ? ％> ? ?
? <％ ? Comm.Parameters.Append ? usrName ? ％> ? ?
? <％ ? Comm.Parameters.Append ? usrPwd ? ％> ? ?
? <％ ? Comm.Parameters.Append ? age ? ％> ? ?
? <％ ? Comm.Parameters.Append ? PhoneNum ? ％> ? ?
? <％ ? Comm.Parameters.Append ? Address ? ％> ? ?
? <％ ? Comm.Parameters(“usrName”)=request ? ?
? (“usrName”) ? ％> ? ?
? <％ ? Comm.Parameters(“usrPasswd”)=request ? ?
? (“usrPasswd”) ? ％> ? ?
? <％ ? Comm.Parameters(“age”)=request(“age”) ? ％> ? ?
? <％ ? Comm.Parameters(“PhoneNum”)=request ? ?
? (“PhoneNum”) ? ％> ? ?
? <％ ? Comm.Parameters(“Address”)=request ? ?
? (“Address”) ? ％> ? ?
? <％ ? Comm.Execute ? ％> ? ?
? <％ ? RetValue=Cint(Comm(“RetCode”)) ? ％> ? ?
? //根據數據庫存儲過程返回代碼判斷注冊是否成功 ? ?
? <％ ? if ? RetValue< ? 0 ? then ? ％> ? ? ?
? <％ ? response.Redirect ? RegisterFail.html ? ％> ? ?
? <％ ? else ? ％> ? ?
? <％ ? response.Redirect ? RegisterOk.html ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? 方法三 ? ?
? 利用MTS(Microsoft ? Transaction ? Server)組件的事務處理機制實現事務處理時，需要特別注意的是，這種機制下的事務不能跨越多個ASP頁，如果一個事務處理需要來自多個組件的對象，則須將對這些對象的操作組合在一個ASP頁中。 ? ?
? 首先需要在頁首添加指令@TRANSACTION，將一個ASP頁面聲明為事務性。@TRANSACTION指令必須在一頁中的第一行，否則將產生錯誤。當頁面中ASP腳本處理結束時，當前事務即告結束。 ? ?
? <％@ ? TRANSACTION=Required ? Language= ? ?
? VB ? Script ? ％> ? ?
? //事務執行成功觸發事件 ? ?
? <％ ? Sub ? OnTransactionCommit() ? ％> ? ? ?
? <％ ? response.Redirect ? RegisterOk.html ? ％> ? ?
? <％ ? End ? Sub ? ％> ? ?
? //事物執行失敗觸發事件 ? ?
? <％ ? Sub ? OnTransactionAbort() ? ％> ? ? ?
? <％ ? response.Redirect ? RegisterFail.html ? ％> ? ?
? <％ ? End ? Sub ? ％> ? ?
? <％ ? sqlText=“Insert ? into ? USER(userName,userPasswd) ? values(‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“usrName”) ? ＆ ? “’,‘” ? ＆request(“usrPasswd”)＆“’) ? ” ? ％> ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? <％ ? ObjectContext.SetAbort ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? <％ ? sqlText=“Insert ? into ? USERDOC(userName,Age,Sex,PhoneNumber,Address) ? ”％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “values(‘” ? ＆ ? request ? ?
? (“usrName”)＆ ? “’, ? ” ? ＆ ? request(“Age”) ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “,’” ? ＆ ? request ? ?
? (“PhoneNum”) ? ＆ ? “’,‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“Address”) ? ＆ ? “’) ? ” ? ％> ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? <％ ? ObjectContext.SetAbort ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? <％ ? ObjectContext.SetComplete ? ％> ? ?
? 方案比較 ? ?
? 從靈活的角度考慮，選擇采用ASP數據庫組件的方法具有一定的優勢：既可以選用ADO數據庫組件完成事務處理，同時還可以根據實際需要，定制自己的數據庫組件（只要滿足ASP組件編寫規范即可）。如果從數據庫事務處理的可靠性等角度考慮，則采用數據庫內部的事務處理存儲過程更好。這樣可以直接利用數據庫事務機制完成應用程序的邏輯事務處理，安全可靠，并且減少了Web服務器與數據庫服務器之間的數據交互。這一點對分布式數據庫系統尤為重要。采用MTS組件的事務處理方法的優勢在于：由MTS服務器直接控制和管理組件（在MTS中注冊的組件）操作的完成和撤消，具有良好的擴展空間和應用前景，可以充分發揮MTS的技術優勢，增強網絡應用的容錯性能，提高IIS ? Web服務器的動態性能。
? 1.ASP事務處理基本原理 ? ?
? ASP ? 事務處理是以Microsoft ? Transaction ? Server（簡稱MTS）為基礎的。MTS ? 是一個運行于Windows ? NT環境下的事務處理系統，用于開發、配置和管理高性能、可分級的、有魯棒性的企業 ? Internet ? 和 ? Intranet ? 服務器應用程序。MTS為開發分布式的，基于組件的應用程序提供了一個應用程序設計模型，它也為配置和管理這些應用程序提供了一個運行環境。 ? ?
? 創建事務性腳本的功能內置在 ? Internet ? Information ? Server中。如果您安裝了 ? Microsoft ? Transaction ? Server，就可以將組件打包，以使組件在事務內部運行。 ? ?
? 事務是整體成功或失敗的操作，事務處理常用于對數據庫進行可靠地更新。在對數據庫進行許多相關更改或同時更新多個數據庫時，要保證所有更改都被正確執行。如果這些更改中的任何一個失敗，都需要恢復數據庫表的原始狀態。 ? ?
? 如果沒有 ? MTS，您就需要編寫腳本和組件，手工跟蹤請求的更改情況，以便在某些更改失敗時恢復數據。使用 ? MTS，您只需簡單的將您的腳本和組件聲明為“需要事務”并讓 ? MTS ? 處理事務的一致性。事務處理只適用于數據庫訪問；MTS ? 不能對文件系統或其他的非事務性資源的更改進行恢復操作。應用程序所訪問的數據庫必須為 ? MTS ? 所支持。目前，MTS ? 支持 ? Microsoft ? SQL ? Server ? 及任何支持 ? XA ? 協議（由 ? X/Open ? 協會制定）的服務器。MTS ? 將繼續擴展對其他數據庫的支持。 ? ?
? 事務不能跨越多個 ? ASP ? 頁。如果一個事務需要來自多個組件的對象，則須將使用這些對象的操作組合在一個 ? ASP ? 頁中。例如，假定有一個組件用于更新工資單數據庫，還有一個組件用于更新人力資源數據庫中的員工記錄。為了記錄一個員工的新的工資信息，您需要編寫這樣一個腳本，該腳本在一個事務環境中調用這兩個組件，一個用于更新工資單數據庫，另一個用于更新人力資源數據庫中的員工等級。 ? ?
? ?
? 2.在ASP腳本中編寫事務型應用 ? ?
? 1. ? 聲明事務性腳本 ? ?
? 在將一個ASP頁聲明為事務性時，此頁中的任何腳本命令和對象都運行在同一個事務環境中，MTS處理生成事務的細節并決定事務成功（提交）或失敗（終止）。要將某個頁聲明為事務性，可在頁首添加 ? @TRANSACTION ? 指令： ? ?
? ?
? value ? 參數可以是下列之一： ? ?
? Requires_New ? ：啟動一個新的事務。 ? ?
? Required ? ： ? 啟動一個新的事務。 ? ?
? Supported： ? 不啟動事務。 ? ?
? Not_Supported： ? 不啟動事務。 ? ?
? @TRANSACTION ? 指令必須在一頁中的第一行，否則將產生錯誤。必須將該指令添加到需要在事務下運行的每一頁中。當腳本處理結束時，當前事務即告結束。 ? ?
? 如果事務被終止，MTS將恢復對支持事務的資源的任何更改。目前，僅數據庫服務器完全支持事務，因為數據庫中的數據對于企業應用是最為關鍵的。MTS不對硬盤上的文件、會話和應用程序的變量、集合等的改變進行恢復，然而您可以如下文所述，通過編寫事務事件來編寫恢復變量和集合的腳本。在某些時候，您的腳本也可以顯式的提交或終止一個事務，如向文件寫數據失敗時。 ? ?
? 2. ? 提交或終止腳本 ? ?
? 利用 ? ObjectContext ? 對象可以提交或放棄一項由MTS管理的事務，為此，ObjectContext ? 對象提供了兩個方法： ? ?
? (1)SetComplete ? 方法 ? ?
? 聲明腳本不了解事務未完成的原因。如果事務中的所有組件都調用 ? SetComplete，事務將完成。 ? ?
? (2)SetAbort ? 方法 ? ?
? 聲明被腳本初始化的事務未完成，無法更新源。 ? ?
? 示例： ? ?
? <%@ ? Transaction ? = ? Required ? %> ?
? <% ?
? Set ? CurrentQOB ? = ? Server.CreateObject("Mylib. ? Inventory") ? ' ? 創建Inventory對象 ?
? Set ? CurrentBorrow ? = ? Server.CreateObject ? ("Mylib.Borrow") ? ' ? 創建Borrow對象 ?
? CheckQuantity ? = ? Request.Form("QuantityTo ? Borrow") ?
? CheckBook ? = ? Request.Form("BookCode") ?
? QuantityStatus ? = ? CurrentQOB.CheckQOB ? (CheckQuantity,CheckBook)'檢查存書量 ?
? If ? QuantityStatus ? = ? None ? '如果存書量不足 ?
? ObjectContext.SetAbort ? '終止事務 ?
? Response.Write ? "對不起，存書量不足！" ?
? Else'如果存書量充足 ?
? ObjectContext.SetComplete ? '繼續執行事務 ?
? Account ? = ? Request.Form("AccountIn") ?
? Saleupdate ? = ? CurrentBorrow.PostIt(Account) ?
? End ? If ?
? %> ?
? ?
? ?
? 這里示范使用 ? SetAbort ? 和SetComplete ? 的方法。假設有一個網上有償借閱圖書館的主頁，其中，BorrowBookData.htm ? 文件獲取處理借閱圖書請求所需的數據。第二個文件BorrowVerify.asp ? 中的腳本使用兩個對象Inventory ? 和 ? Borrow ? 來處理借閱（注意，在本文所舉的例子中，使用了一些作者自己開發的Web服務器端ActiveX組件對象，如對象Inventory ? 和 ? Borrow等，在實際應用中，這些組件對象需由讀者自行開發）。如果 ? Inventory ? 返回了錯誤代碼表示存書不足，就會調用 ? SetAbort。如果 ? Inventory ? 對象沒有返回錯誤代碼，將會調用 ? SetComplete ? 處理借閱請求。 ? ?
? BorrowBookData.htm ? 源文件： ? ?
? ?
? ?
? <%@ ? TRANSACTION ? = ? Required ? %> ?
? <%Response.Buffer ? = ? True ? '緩存輸出 ? %> ?
? <HTML> ?
? <BODY> ?
? <H1>網上有償借閱圖書館</H1> ?
? <% ? ' ? 創建作者自己開發的ActiveX組件對象 ?
? Set ? LibAction ? = ? Server.CreateObject ? ("MyExample.LibComponent") ?
? ' ? 根據借閱者輸入的帳戶、密碼進行業務處理 ?
? LibAction.Borrow(Request.Form("Account ? Num"),Request.Form("Password")) ?
? %> ?
? </BODY> ?
? </HTML> ?
? <% ? ' ? 如果借閱者帳戶有效顯示下頁 ?
? Sub ? OnTransactionCommit() ?
? Response.Write ? "<HTML>" ?
? Response.Write ? "<BODY>" ?
? Response.Write ? "帳戶有效！" ?
? Response.Write ? "</BODY>" ?
? Response.Write ? "</HTML>" ?
? Response.Flush() ?
? End ? sub ? %> ?
? <% ? ' ? 如果借閱者帳戶無效顯示下頁 ?
? Sub ? OnTransactionAbort() ?
? Response.Clear() ?
? Response.Write ? "<HTML>" ?
? Response.Write ? "<BODY>" ?
? Response.Write ? "帳戶無效！" ?
? Response.Write ? "</BODY>" ?
? Response.Write ? "</HTML>" ?
? Response.Flush() ?
? End ? sub ? %> ?
? ?
? ?
? 3. ? 編寫事務事件 ? ?
? 腳本本身不能決定事務是成功還是失敗。但是，可以編寫提交或終止事務時被調用的事件。為此，ObjectContext ? 對象提供了兩個事件： ? ?
? (1)OnTransactionCommit ? 事件 ? ?
? 它在一個已處理的腳本事務提交后發生。該事件發生時，如果腳本中有 ? OnTransactionCommit ? 子例程，IIS ? 將處理該子例程。 ? ?
? (2)OnTransactionAbort ? 事件 ? ?
? 如果事務異常終止，就會發生該事件。當 ? OnTransactionAbort ? 事件發生時，如果腳本中有 ? OnTransactionAbort ? 子程序，則 ? IIS ? 將執行它。 ? ?
? 例如，假設有一個根據借閱者帳戶、密碼進行業務處理的腳本，并且您需要針對事務的不同狀態將不同的頁返回給用戶，那么就可以使用 ? OnTransactionCommit ? 和 ? OnTransactionAbort ? 事件來編寫對用戶的不同響應。?
_______________________
-------------------------------------------------------------------------------- ?
? ? 運氣 ? 于 ? 8/24/2001 ? 9:46:19 ? AM ? 加貼在 ? Joy ? ASP ? ←返回版面： ? ? ? ?
? 在開發Web應用時，無一例外地需要訪問數據庫，以完成對數據的查詢、插入、更新、刪除等操作。受應用邏輯的影響，有時需要將多條數據庫操作指令組成一個工作單元（事務）。在數據庫中，所謂事務是指一組邏輯操作單元，它使數據從一種狀態變換到另一種狀態。為確保數據庫中數據的一致性，應當用離散的成組的邏輯單元操作數據：當它全部完成時，數據的一致性可以保持；而當單元中的一部分操作失敗時，整個事務會被全部忽略，所有從起始點以后的操作全部退回到開始狀態。 ? ?
? 實際上，在默認方式下對數據庫的每一次操作都是隱含的事務處理。本文以一個典型的用戶注冊程序為例，介紹三種利用ASP實現事務處理的方法：基于ASP數據庫組件的解決方法、基于數據庫內部的事務處理機制的解決方法和基于MTS組件的解決方法。 ? ?
? ?
? 程序功能 ? ?
? 在SQL ? Server數據庫中建立兩個表：USER表和USERDOC表。其中USER表中存放的是注冊用戶的用戶名和密碼，USERDOC表中存放的是該注冊用戶的個人資料，并且以用戶名為索引。下面是表USER和USERDOC的定義： ? ?
? Create ? Table ? USER(userName ? varchar(30),userPasswd ? varchar(30)) ? ?
? Create ? Table ? USERDOC(userName ? varchar(30),Age ? int,Sex ? int,PhoneNumber ? varchar(20),Address ? varchar(50)) ? ?
? 當用戶請求注冊時，ASP腳本先將用戶名和密碼插入到USER表中，然后在USERDOC表中插入用戶個人信息（年齡、性別、聯系電話和家庭住址等）。同時，應用程序還必須保證USER表中的每一條記錄在USERDOC表中都有相應的記錄。 ? ?
? 方法一 ? ?
? 利用ASP內置ADO組件中的Connection對象可以實現對數據庫操作的事務性處理。Connection對象的部分方法如下： ? ?
? ●Connection.BeginTrans方法：啟動一個事務； ? ?
? ●Connection.CommitTrans方法：完成/提交一個事務； ? ?
? ●Connection.RollBackTrans方法：撤消/放棄一個事務。 ? ?
? //啟動一個事務操作 ? ?
? <％ ? Conn.BeginTrans ? ％> ? ? ?
? <％ ? sqlText=“Insert ? into ? USER(userName,userPasswd) ? values(‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“usrName”) ? ＆ ? “’，‘”＆request(“usrPasswd”)＆“’) ? ” ? ％> ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? //如果插入數據操作失敗，則事務向前回滾 ? ?
? <％ ? conn.RollBackTrans ? ％> ? ? ?
? <％ ? response.Redirct ? RegisterFail.html ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? <％ ? sqlText=“Insert ? into ? USERDOC(userName,Age,Sex,PhoneNumber,Address) ? ”％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “values(‘”＆ ? request ? ?
? (“usrName”) ? ＆ ? “’, ? ” ? ＆ ? request(“Age”) ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “,‘” ? ＆ ? request ? ?
? (“PhoneNum”) ? ＆ ? “’,‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“Address”) ? ＆ ? “’) ? ” ? ％> ? ?
? //執行事務單元中的第二條插入語句 ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? //如果操作失敗，則事務向前回滾 ? ?
? <％ ? conn.RollBackTrans ? ％> ? ? ?
? <％ ? response.Redirct ? RegisterFail.html ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? //如果整個事務操作執行正確，則提交事務 ? ?
? <％ ? Conn.CommitTrans ? ％> ? ? ?
? //轉向注冊成功處理頁面 ? ?
? <％ ? response.Redirct ? RegisterOk.html ? ％> ? ? ?
? 方法二 ? ?
? 可以利用數據庫系統內部的事務處理機制，通過在數據庫服務器中編寫包含事務的存儲過程，完成對數據操作的事務處理。同時，利用ADO組件調用存儲過程，還可以根據存儲過程的返回代碼判斷事務處理是否執行成功。 ? ?
? 在數據庫系統中，每一條SQL語句都是一個事務。因此可以保證每條語句要么完成，要么退回到開始之處。但是如果希望一組SQL語句的操作要么全部完成，要么全部無效，就需要利用數據庫的事務處理機制來實現。 ? ?
? 在數據庫中生成存儲過程的主要代碼如下： ? ?
? Create ? proc ? RegisterUser ? ?
? (@usrName ? varchar(30), ? @usrPasswd ? varchar(30),@age ? int, ? @PhoneNum ? varchar(20), ? @Address ? varchar(50) ? ) ? ?
? as ? ?
? begin ? ?
? //顯示定義并開始一個事務 ? ?
? begin ? tran ? ? ?
? insert ? into ? USER(userName,userPasswd) ? values(@usrName,@usrPasswd) ? ?
? if ? @@error<>0 ? ?
? begin ? ?
? //操作失敗，則事務回滾 ? ?
? rollback ? tran ? ? ?
? //返回存儲過程，并設置返回碼為事務操作失敗 ? ?
? return ? －1 ? ? ?
? end ? ?
? insert ? into ? USERDOC(userName,age,sex,PhoneNumber,Address) ? ? ?
? values(@Usrname,@age,@PhoneNum,@Address) ? ?
? if ? @@error<>0 ? ?
? begin ? ?
? //操作失敗，則事務回滾 ? ?
? rollback ? tran ? ? ?
? return ? －1 ? ?
? end ? ?
? //如果操作執行正確，則提交事務 ? ?
? commit ? tran ? ? ?
? return ? 0 ? ?
? end ? ?
? 在ASP腳本中調用數據庫存儲過程的主要代碼如下： ? ?
? <％ ? Set ? Comm=server.CreateObject ? ?
? (“ADODB.Command”) ? ％> ? ?
? <％ ? Set ? Comm.ActiveConnection=conn ? ％> ? ?
? <％ ? Comm.CommandType=adCmdStoredProc ? ％> ? ?
? <％ ? Comm.CommandText=“RegisterUser” ? ％> ? ?
? //創建存儲過程返回參數對象 ? ?
? <％ ? Set ? RetCode=Comm.CreateParameter ? ?
? (“RetCode”,adInteger,adParamReturnValue) ? ％> ? ? ?
? //創建存儲過程輸入參數對象 ? ?
? <％ ? Set ? usrName=Comm.CreateParameter ? ?
? (“usrName”,adVarchar,adParamInput,30) ? ％> ? ? ?
? <％ ? Set ? usrPwd=Comm.CreateParameter ? ?
? (“usrPasswd”,adVarchar,adParamInput,30) ? ％> ? ?
? <％ ? Set ? age=Comm.CreateParameter(“age”,adInteger,adParamInput) ? ％> ? ?
? <％ ? Set ? PhoneNum=Comm.CreateParameter ? ?
? (“PhoneNum”,adVarchar,adParamInput, ? 20) ? ％> ? ?
? <％ ? Set ? Address=Comm.CreateParameter(“Address”,adVarchar,adParamInput,50) ? ％> ? ?
? <％ ? Comm.Parameters.Append ? usrName ? ％> ? ?
? <％ ? Comm.Parameters.Append ? usrPwd ? ％> ? ?
? <％ ? Comm.Parameters.Append ? age ? ％> ? ?
? <％ ? Comm.Parameters.Append ? PhoneNum ? ％> ? ?
? <％ ? Comm.Parameters.Append ? Address ? ％> ? ?
? <％ ? Comm.Parameters(“usrName”)=request ? ?
? (“usrName”) ? ％> ? ?
? <％ ? Comm.Parameters(“usrPasswd”)=request ? ?
? (“usrPasswd”) ? ％> ? ?
? <％ ? Comm.Parameters(“age”)=request(“age”) ? ％> ? ?
? <％ ? Comm.Parameters(“PhoneNum”)=request ? ?
? (“PhoneNum”) ? ％> ? ?
? <％ ? Comm.Parameters(“Address”)=request ? ?
? (“Address”) ? ％> ? ?
? <％ ? Comm.Execute ? ％> ? ?
? <％ ? RetValue=Cint(Comm(“RetCode”)) ? ％> ? ?
? //根據數據庫存儲過程返回代碼判斷注冊是否成功 ? ?
? <％ ? if ? RetValue< ? 0 ? then ? ％> ? ? ?
? <％ ? response.Redirect ? RegisterFail.html ? ％> ? ?
? <％ ? else ? ％> ? ?
? <％ ? response.Redirect ? RegisterOk.html ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? 方法三 ? ?
? 利用MTS(Microsoft ? Transaction ? Server)組件的事務處理機制實現事務處理時，需要特別注意的是，這種機制下的事務不能跨越多個ASP頁，如果一個事務處理需要來自多個組件的對象，則須將對這些對象的操作組合在一個ASP頁中。 ? ?
? 首先需要在頁首添加指令@TRANSACTION，將一個ASP頁面聲明為事務性。@TRANSACTION指令必須在一頁中的第一行，否則將產生錯誤。當頁面中ASP腳本處理結束時，當前事務即告結束。 ? ?
? <％@ ? TRANSACTION=Required ? Language= ? ?
? VB ? Script ? ％> ? ?
? //事務執行成功觸發事件 ? ?
? <％ ? Sub ? OnTransactionCommit() ? ％> ? ? ?
? <％ ? response.Redirect ? RegisterOk.html ? ％> ? ?
? <％ ? End ? Sub ? ％> ? ?
? //事物執行失敗觸發事件 ? ?
? <％ ? Sub ? OnTransactionAbort() ? ％> ? ? ?
? <％ ? response.Redirect ? RegisterFail.html ? ％> ? ?
? <％ ? End ? Sub ? ％> ? ?
? <％ ? sqlText=“Insert ? into ? USER(userName,userPasswd) ? values(‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“usrName”) ? ＆ ? “’,‘” ? ＆request(“usrPasswd”)＆“’) ? ” ? ％> ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? <％ ? ObjectContext.SetAbort ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? <％ ? sqlText=“Insert ? into ? USERDOC(userName,Age,Sex,PhoneNumber,Address) ? ”％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “values(‘” ? ＆ ? request ? ?
? (“usrName”)＆ ? “’, ? ” ? ＆ ? request(“Age”) ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? “,’” ? ＆ ? request ? ?
? (“PhoneNum”) ? ＆ ? “’,‘” ? ％> ? ?
? <％ ? sqlText=sqlText ? ＆ ? request(“Address”) ? ＆ ? “’) ? ” ? ％> ? ?
? <％ ? conn.execute(sqlText) ? ％> ? ?
? <％ ? if ? conn.Errors.Count>0 ? then ? ％> ? ?
? <％ ? conn.Errors.Clear ? ％> ? ?
? <％ ? ObjectContext.SetAbort ? ％> ? ?
? <％ ? end ? if ? ％> ? ?
? <％ ? ObjectContext.SetComplete ? ％> ? ?
? 方案比較 ? ?
? 從靈活的角度考慮，選擇采用ASP數據庫組件的方法具有一定的優勢：既可以選用ADO數據庫組件完成事務處理，同時還可以根據實際需要，定制自己的數據庫組件（只要滿足ASP組件編寫規范即可）。如果從數據庫事務處理的可靠性等角度考慮，則采用數據庫內部的事務處理存儲過程更好。這樣可以直接利用數據庫事務機制完成應用程序的邏輯事務處理，安全可靠，并且減少了Web服務器與數據庫服務器之間的數據交互。這一點對分布式數據庫系統尤為重要。采用MTS組件的事務處理方法的優勢在于：由MTS服務器直接控制和管理組件（在MTS中注冊的組件）操作的完成和撤消，具有良好的擴展空間和應用前景，可以充分發揮MTS的技術優勢，增強網絡應用的容錯性能，提高IIS ? Web服務器的動態性能。
轉載于:https://blog.51cto.com/jetking/28300
總結
以上是生活随笔為你收集整理的ASP中事务处理资料收集的全部內容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： tomcat 下载
- 下一篇： Fences有一个桌面分区消失了怎么办