ADO OriginalValue en UnderlyingValue eigenschappen
Definitie en gebruik
De OriginalValue-eigenschap kan een variant-waarde retourneren die de waarde van een veld bevat die bestond voordat de laatste Update of UpdateBatch-methode werd aangeroepen.
De UnderlyingValue-eigenschap kan een variant-waarde retourneren die de huidige waarde van een veld bevat. Deze waarde wordt niet noodzakelijkerwijs weergegeven als er wijzigingen zijn aangebracht door andere gebruikers en kan mogelijk niet de nieuwste waarde zijn.
Hint:Gebruik de Resync-eigenschap van het Recordset-object om de nieuwste waarden van alle Field-objecten in de Fields-collectie te verkrijgen.
Hint:Deze twee eigenschappen kunnen samen worden gebruikt om conflicten die zich voordoen tijdens batch-updates op te lossen.
syntaxis
objField.OriginalValue objField.UnderlyingValue
voorbeeld
<%
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..................
'Controleer op wijzigingen
rs.movefirst
while rs.eof=false
if objfield.OriginalValue<>objfield.UnderlyingValue then
response.write("De gegevens zijn veranderd!<br />")
response.write("Oorspronkelijke waarde: ")
response.write(objfield.OriginalValue & "<br />")
response.write("Huidige waarde: ")
response.write(objfield.UnderlyingValue & "<br />")
end if
rs.movenext
next
'Meer code...................
rs.Close
conn.close
%>
