Vlastnosti ADO OriginalValue a UnderlyingValue
❮ Vyplňte referenční objekt pole
Vlastnost OriginalValue vrací variantu, která obsahuje hodnotu pole tak, jak existovala hned po posledním volání metody Update nebo UpdateBatch.
Vlastnost UnderlyingValue vrací variantu, která obsahuje aktuální hodnotu pole. Tato hodnota nemusí nutně ukazovat změny provedené jinými uživateli a nemusí jít o nejnovější hodnotu.
Tip: Pomocí vlastnosti Resync objektu Recordset získáte nejnovější hodnoty pro všechny objekty Field v kolekci Fields Collection.
Tip: Tyto vlastnosti lze použít společně, aby se zabránilo konfliktům aktualizací.
Syntax
objField.OriginalValue
objField.UnderlyingValue
Příklad
<%
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
%>
❮ Vyplňte referenční objekt pole