<Campo Referencia completa de objetos
El OriginalValue propiedad devuelve una variante que contiene el valor del campo, tal como existía justo después de la última actualización o UpdateBatch llamada al método.
El UnderlyingValue propiedad devuelve una variante que contiene el valor actual de un campo. Este valor no incluye necesariamente los cambios realizados por otros usuarios y puede que no sea el último valor.
Tip: Utilice la propiedad de resincronización del objeto de registros para obtener los valores más recientes para todos los objetos de campo en la colección Fields.
Tip: Estas propiedades se puede utilizar en conjunto para prevenir conflictos de actualización.
Sintaxis
objField.OriginalValue
objField.UnderlyingValue
Ejemplo
<%
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
%>
<Campo Referencia completa de objetos