ADO OriginalValue 和 UnderlyingValue 属性
❮ 完整字段对象参考
OriginalValue 属性返回一个包含字段值(在最后一次 Update 或 UpdateBatch 方法调用之后存在的)的变体。
UnderlyingValue 属性返回一个包含字段当前值的变体。此值不一定显示其他用户所做的更改,也可能不是最新值。
提示: 使用 Recordset 对象的 Resync 属性获取 Fields 集合中所有 Field 对象的最新值。
提示: 这些属性可以一起使用来防止更新冲突。
语法
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")
'一些代码..................
'检查更改
rs.movefirst
while rs.eof=false
if objfield.OriginalValue<>objfield.UnderlyingValue then
response.write("数据已更改!<br>")
response.write("原始值:")
response.write(objfield.OriginalValue & "<br>")
response.write("当前值:")
response.write(objfield.UnderlyingValue & "<br>")
end if
rs.movenext
next
'更多代码...................
rs.Close
conn.close
%>
❮ 完整字段对象参考