Свойства OriginalValue и UnderlyingValue ADO

Определение и использование

Атрибут OriginalValue возвращает значение variant, которое содержит значение поля до последнего вызова методов Update или UpdateBatch.

Атрибут UnderlyingValue возвращает значение variant, которое содержит текущее значение поля. Это значение не будет отображать изменения, сделанные другими пользователями, и может не быть последним.

Совет:Используйте атрибут Resync объекта Recordset, чтобы получить последние значения всех объектов Field в集合е Fields.

Совет:Эти два свойства можно использовать вместе, чтобы решить конфликты, возникающие при批更新.

Синтаксис

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
%>