دروس ASP

الصفحة الرئيسية ASP

دروس الفسفور الابيض

مقدمة صفحات الويب صفحات الويب الحلاقة تخطيط صفحات الويب مجلدات صفحات الويب صفحات الويب العالمية نماذج صفحات الويب كائنات صفحات الويب ملفات صفحات الويب قواعد بيانات صفحات الويب مساعدي صفحات الويب WebPages WebGrid مخططات صفحات الويب البريد الإلكتروني لصفحات الويب أمن صفحات الويب نشر صفحات الويب أمثلة على صفحات الويب فئات صفحات الويب

ASP.NET Razor

مقدمة الحلاقة تركيب الشفرة المتغيرات Razor C # حلقات موس الحلاقة C # Razor C # المنطق متغيرات Razor VB حلقات الحلاقة VB Razor VB Logic

كلاسيك ASP

مقدمة ASP بناء جملة ASP متغيرات ASP إجراءات ASP شروط ASP حلقات ASP نماذج ASP ملفات تعريف الارتباط ASP جلسة ASP تطبيق ASP تضمين ASP # ASP Global.asa ASP أياكس البريد الإلكتروني ASP أمثلة على ASP

مرجع ASP

وظائف ASP VB كلمات رئيسية ASP VB استجابة ASP طلب ASP تطبيق ASP جلسة ASP خادم ASP خطأ ASP نظام ملفات ASP ASP TextStream محرك ASP ملف ASP مجلد ASP قاموس ASP أدروتور ASP متصفح ASP ربط محتوى ASP محور دوار للمحتوى ASP المرجع السريع ASP

برنامج ADO التعليمي

مقدمة ADO اتصال ADO مجموعة سجلات ADO عرض ADO استعلام ADO نوع ADO إضافة ADO تحديث ADO حذف ADO عرض ADO تسريع ADO

كائنات ADO

أمر ADO اتصال ADO خطأ ADO حقل ADO معلمة ADO خاصية ADO سجل ADO مجموعة سجلات ADO دفق ADO أنواع بيانات ADO

خصائص ADO OriginalValue و UnderlyingValue


مرجع كائن الحقل الكامل

تقوم الخاصية OriginalValue بإرجاع متغير يحتوي على قيمة الحقل كما كانت موجودة مباشرة بعد آخر استدعاء للأسلوب Update أو UpdateBatch.

تقوم الخاصية UnderlyingValue بإرجاع متغير يحتوي على القيمة الحالية للحقل. لا تعرض هذه القيمة بالضرورة التغييرات التي أجراها المستخدمون الآخرون وقد لا تكون أحدث قيمة.

تلميح: استخدم خاصية إعادة المزامنة لكائن مجموعة السجلات للحصول على أحدث القيم لجميع كائنات الحقل في مجموعة الحقول.

تلميح: يمكن استخدام هذه الخصائص معًا لمنع تعارض التحديث.


بناء الجملة

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..................

'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
%>

مرجع كائن الحقل الكامل