منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : رسالة خطأ اذا كان الحقل فارغ
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
لدى جدول TABLE1  به حقل للوظيفة postt
أريد كود لكتابة قيمة الحقل postt فى السجل الأخير من الجدول TABLE1
  بحيث اذا كان الحقل فارغآ فى هذا السجل يكتب"غير معلومة"
أرجو تعديل الكود الآتى
لأنه حين يجد الحقل فارغآ فى هذا السجل تظهر رساسة خطأ  Run-Time error 94  بدلآ من ترك التكست فارغآ
كود :
كود :
      Adodc1.Recordset.MoveLast
       XXX = Adodc1.Recordset.Fields(postt)
    Text1.Text = XXX
ولكم ألف شكر
أهلا أخي الكريم , جرب التالي :

كود :
Adodc1.Recordset.MoveLast
If Not IsNull(Adodc1.Recordset.Fields("postt")) Then XXX = Adodc1.Recordset.Fields("postt") Else XXX = ""
Text1.Text = XXX
تمام
بارك الله فيك
ولك ألف شكر
(03-08-15, 06:21 PM)اسلام الكبابى كتب : [ -> ]Adodc1.Recordset.MoveLast

If Not IsNull(Adodc1.Recordset.Fields("Salary")) Then XXX = Adodc1.Recordset.Fields("Salary") Else XXX = ""
Text7.Text = ("لايوجد له مرتب")