Propriétés OriginalValue et UnderlyingValue d'ADO
Définition et utilisation
La propriété OriginalValue peut retourner une valeur variant, qui contient la valeur du champ existante avant la dernière appel de la méthode Update ou UpdateBatch.
La propriété UnderlyingValue peut retourner une valeur variant, qui contient la valeur actuelle d'un champ. Cette valeur ne montre pas nécessairement les modifications apportées par d'autres utilisateurs et peut ne pas être la valeur la plus récente.
Avis :Utilisez la propriété Resync de l'objet Recordset pour obtenir les valeurs les plus récentes de tous les objets Field dans la collection Fields.
Avis :Ces deux propriétés peuvent être utilisées ensemble pour résoudre les conflits qui peuvent survenir lors des mises à jour par lots.
语法
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")
Some code..................
'Vérifier les modifications'
rs.movefirst
while rs.eof=false
if objfield.OriginalValue<>objfield.UnderlyingValue then
response.write("Les données ont changé !<br />")
response.write("Valeur originale : ")
response.write(objfield.OriginalValue & "<br />")
response.write("Valeur actuelle : ")
response.write(objfield.UnderlyingValue & "<br />")
end if
rs.movenext
next
'Plus de code...................
rs.Close
conn.close
%>
