Properti OriginalValue dan UnderlyingValue ADO
Definisi dan penggunaan
Properti OriginalValue dapat mengembalikan nilai variant yang mengandung nilai field yang ada sebelum pemanggilan method Update atau UpdateBatch terakhir.
Properti UnderlyingValue dapat mengembalikan nilai variant yang mengandung nilai saat ini suatu field. Nilai ini tidak akan menunjukkan perubahan yang disebabkan oleh pengguna lain, dan mungkin bukan nilai terbaru.
Petunjuk:Gunakan properti Resync objek Recordset untuk mendapatkan nilai terbaru semua objek Field dalam koleksi Fields.
Petunjuk:Kombinasi kedua properti ini dapat digunakan untuk mengatasi konflik yang muncul saat mengupdate massal.
语法
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.................. 'Periksa perubahan rs.movefirst while rs.eof=false if objfield.OriginalValue<>objfield.UnderlyingValue then response.write("Data telah berubah!<br />") response.write("Nilai asli: ") response.write(objfield.OriginalValue & "<br />") response.write("Nilai saat ini: ") response.write(objfield.UnderlyingValue & "<br />") end if rs.movenext next 'Kode berikutnya................... rs.Close conn.close %>