您现在的位置: 军旅同心-旅游自驾-军旅文学 >> 读书赏析 >> 学习园地 >> 电脑网络 >> 技术文章 >> 正文
ADO如何提供异动功能?(BIG5)
作者:采集员 文章来源:来源于网络 点击数: 更新时间:2005-9-10 12:32:01
BeginTrans/CommitTrans/Rollback方法

?您必?更新多??料表中的?料?位?,??保在所有的?料表中所作的改?都被完成(??Commit)、或者不?(撤??原Rollback)?,您可以使用??(transaction)????料的完整性。

例如,?您???甲???到另一?乙???,需要?甲??上?去一???加到另一?乙??上。如果其中有一?更新失?,??就不?平衡。

使用??(transaction)功能?,??料所做的任何改?都可撤??原(Rollback),或者可以??(Commit)?存所有??料?的改?。

加上??(transaction)功能的方法,?在更新第一??料?位前,先使用BeginTrans 方法,然後,只要有任何更新失?,就可以使用RollbackTrans方法撤?所有的更新。?您成功地更新最後一??料?位之後,就可使用CommitTrans方法??(Commit)?存到?料?。

ADO有三?支援???理的方法:BeginTrans、CommitTrans、?Rollback。但是,?料?本身也必?支援???理的功能,譬如SQL Server提供??(transaction)?理的功能,但是Access?未提供。

BeginTrans:?始一????理,一旦?始一????理,就必?在???料?或?用程式之前使用CommitTrans或Rollback。??用程式?束?,?有交付??(Commit)的??要自??原。
CommitTrans:?改??存到?料?中。用BeginTrans方法?????理以後,CommitTrans方法?RecordSet所有的改??存到?料?。?行CommitTrans?,所有改?成?永久性的改?。
Rollback:撤??原,倒退或者撤?目前???理中所有已改?的?料。它同??止???理。
??(transaction)例子

?我?看一?於ASP程式??中使用BeginTrans/ CommitTrans/RollbackTrans提供??(transaction)功能的例子。

本例子,使用RecordSet 的Requery方法,重新?行SELECT指令?入?料到RecordSet。

?行本例子的?料?必?支援???理的功能,譬如SQL Server提供??(transaction)?理的功能,但是Access?未提供。

若要?行本例子,?先安?「企??站???用精?」,以便自?於SQL Server建立comPak?料?。

譬如ASP程式?rs4.asp如下,使用BeginTrans方法?始一????理,? [?案下?] ?料表每一???的 [?案下?次?] ?位加上100,再使用CommitTrans方法?RecordSet所有的改??存到?料?。或者使用Rollback方法,撤?目前???理中所有已改?的?料:

<%

Set conn1 = Server.CreateObject("ADODB.Connection")

conn1.Open "driver={SQL Server};server=(Local);uid=sa;pwd=;database=comPak"

Set rs2 = Server.CreateObject("ADODB.Recordset")

sql = "SELECT * FROM ?案下?"

rs2.Open sql,conn1,1,2,1

conn1.BeginTrans

Do while not rs2.EOF

if IsNull(rs2("?案下?次?")) then rs2("?案下?次?") = 100

rs2("?案下?次?") = rs2("?案下?次?") + 100

rs2.MoveNext

Loop

conn1.CommitTrans

'conn1.RollbackTrans

rs2.Requery

'rs2.Close

'Set rs2 = Server.CreateObject("ADODB.Recordset")

'sql = "SELECT * FROM ?案下?"

'rs2.Open sql,conn1,1,2,1

%>

<TABLE COLSPAN=8 CELLPADDING=5 BORDER=0>

<TR>

<TD ALIGN=CENTER BGCOLOR="#800000"><FONT COLOR="#FFFFFF">名?</FONT></TD>

<TD ALIGN=CENTER BGCOLOR="#800000"><FONT COLOR="#FFFFFF">?案下??案</FONT></TD>

<TD ALIGN=CENTER BGCOLOR="#800000"><FONT COLOR="#FFFFFF">?案下?次?</FONT></TD>

</TR>

<% Do while not rs2.EOF %>

<TR>

<TD BGCOLOR="f7efde" ALIGN=CENTER><%= rs2("名?")%></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER><%= rs2("?案下??案")%></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER><%= rs2("?案下?次?")%></TD>

</TR>

<%

rs2.MoveNext

Loop

%>

以上的 ASP程式?rs4.asp,於用?端使用??器,???行的?果,使用rs2.Requery方法重新?行SELECT指令?入?料到RecordSet,?示???理後的??。

每?行一次,?? [?案下?] ?料表每一???的 [?案下?次?] ?位加上100。

UpdateBatch/CancelBatch (SQL Server)

您可以使用UpdateBatch方法,?多??更的??,批次?回到?料?。

使用UpdateBatch方法?,不必每一??更??都下一?Update方法,多???一起?更,最後再使用UpdateBatch方法,?回到?料?。或是使用CancelBatch方法,放?所有的?更。

?行本例子的?料?必?支援UpdateBatch批次?更?理的功能,譬如SQL Server提供UpdateBatch的功能,但是Access?未提供。

若要?行本例子,?先安?「企??站???用精?」,以便自?於SQL Server建立comPak?料?。

譬如ASP程式?rs3.asp如下,? [?案下?] ?料表每一???的 [?案下?次?] ?位加上10,再使用UpdateBatch方法?RecordSet所有的改??存到?料?。或者使用CancelBatch方法,放?所有的?更:

<%

Set conn1 = Server.CreateObject("ADODB.Connection")

conn1.Open "driver={SQL Server};server=(Local);uid=sa;pwd=;database=comPak"

Set rs3 = Server.CreateObject("ADODB.Recordset")

sql = "SELECT * FROM ?案下?"

rs3.Open sql,conn1,1,4

Do while not rs3.EOF

if IsNull(rs3("?案下?次?")) then rs3("?案下?次?") = 10

rs3("?案下?次?") = rs3("?案下?次?") + 10

rs3.MoveNext

Loop

rs3.UpdateBatch

'rs3.CancelBatch

rs3.Requery

%>

<TABLE COLSPAN=8 CELLPADDING=5 BORDER=0>

<TR>

<TD ALIGN=CENTER BGCOLOR="#800000"><FONT COLOR="#FFFFFF">名?</FONT></TD>

<TD ALIGN=CENTER BGCOLOR="#800000"><FONT COLOR="#FFFFFF">?案下??案</FONT></TD>

<TD ALIGN=CENTER BGCOLOR="#800000"><FONT COLOR="#FFFFFF">?案下?次?</FONT></TD>

</TR>

<% Do while not rs3.EOF %>

<TR>

<TD BGCOLOR="f7efde" ALIGN=CENTER><%= rs3("名?")%></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER><%= rs3("?案下??案")%></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER><%= rs3("?案下?次?")%></TD>

</TR>

<%

rs3.MoveNext

Loop

%>

</TABLE>

<%

rs3.Close

conn1.Close

%>

以上的 ASP程式?rs3.asp,於用?端使用??器,???行的?果,?示代?重覆的??。

其中rs3.Open sql,conn1,1,4的4表示?批次???定(Batch Optimistic lock),使用UpdateBatch方法?多??更的??批次?回到?料??,才?定此批?料??。

每?行一次,?? [?案下?] ?料表每一???的 [?案下?次?] ?位加上10。


更多
免责声明:作品版权归所属媒体与作者所有!!本站刊载此文不代表同意其说法或描述,仅为提供更多信息。如果您认为我们侵犯了您的版权,请告知!本站立即删除。有异议请联系我们。
文章录入:烟灰缸    责任编辑:烟灰缸 
网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
| 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 网站地图 | 版权申明 | 网站公告 | 管理登录 |