ADO OriginalValue 和 UnderlyingValue 屬性
❮ 完整的欄位物件參考
OriginalValue 屬性返回一個 variant,其中包含在最後一次呼叫 Update 或 UpdateBatch 方法之後,欄位原有的值。
UnderlyingValue 屬性返回一個 variant,其中包含欄位的當前值。此值不一定顯示其他使用者所做的更改,也不一定是最新值。
提示:使用 Recordset 物件的 Resync 屬性來獲取 Fields Collection 中所有 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")
'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
%>
❮ 完整的欄位物件參考