ADO OriginalValue och UnderlyingValue egenskaper
Definition och användning
OriginalValue-egenskapen returnerar en variant-värde som innehåller värdet för ett fält innan det senaste Update- eller UpdateBatch-anropet.
UnderlyingValue-egenskapen returnerar en variant-värde som innehåller den aktuella värdet för ett fält. Detta värde visar inte nödvändigtvis ändringar som gjorts av andra användare och kanske inte är det senaste värdet.
Tips:Använd Recordset-objektets Resync-egenskap för att få de senaste värdena för alla Field-objekt i Fields-samlingen.
Tips:Dessa egenskaper kan användas tillsammans för att lösa konflikter som uppstår vid batch-uppdateringar.
Syntax
objField.OriginalValue objField.UnderlyingValue
Exempel
<%
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")
Vissa kod..................
'Kontrollera för ändringar
rs.movefirst
while rs.eof=false
if objfield.OriginalValue<>objfield.UnderlyingValue then
response.write("Data har ändrats!<br />")
response.write("Originalt värde: ")
response.write(objfield.OriginalValue & "<br />")
response.write("Nuvarande värde: ")
response.write(objfield.UnderlyingValue & "<br />")
end if
rs.movenext
next
'Mer kod...................
rs.Close
conn.close
%>
