最新的Web开发教程
 

ADO OriginalValue和UnderlyingValue属性


<完整字段对象参考

OriginalValue属性返回包含它的最后更新或UpdateBatch方法调用之后存在的字段值的变体。

UnderlyingValue属性返回一个包含字段的当前值的变体。 此值不一定表示由其他用户所做的更改,可能不是最新的值。

Tip:使用Recordset对象的重新同步属性来获取最新的值在所有字段集合的Field对象。

Tip:这些属性可以一起使用,以防止更新冲突。

句法

objField.OriginalValue

objField.UnderlyingValue

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"

set rs = Server.CreateObject("ADODB.Recordset")
rs.open "customers", conn

set objfield=rs.fields("companyname")

'Some code..................

'Check for changes
rs.movefirst
while rs.eof=false
  if objfield.OriginalValue<>objfield.UnderlyingValue then
    response.write("Data has changed!<br>")
    response.write("Original value: ")
    response.write(objfield.OriginalValue & "<br>")
    response.write("Current value: ")
    response.write(objfield.UnderlyingValue & "<br>")
  end if
  rs.movenext
next

'More code...................

rs.Close
conn.close
%>

<完整字段对象参考