السلام عليكم ...
الحاله:
لدي نموذج مصدره من استعلام مشروط بشرط معين يدخله المستخدم (مثال : العمر = 20). في داخل هذا الانموذج حقل يقوم بحساب عدد السجلات (count)
المشكله :
تكمن عندما يكون الاستعلام لا يحتوي على اية سجلات كيف يمكن للبرنامج ان يتعرف على ان عدد السجلات = صفر اذا كان لايوجد اي معلومه في الاستعلام وغير ذلك يحسب عدد السجلات؟؟؟؟
لقد استخدام هذا الكود في مصدر الحقل ولم يعمل
a= (العمر) Count
عددالسجلات=(iif(a is null,0,a
وشكراً:D
اخي الكريم افحص قيمة EOF و BOF ففي حاله عدم وجود سجلات فان قيمتهما معا تساوي TRUE
الذي فهمته من كلامك أن النموذج مبني على هذا الاستعلام ، إذا كان الأمر كذلك فاستخدم التالي بعد اختيار أو كتابة الشرط :
[اسم مربع النص]=Me.RecordsetClone.RecordCount
ولك تحياتي
السلام عليكم...
شكراً يا أخوان على الردود ...
لكنها لأ سف لم التنجح الطرقتين ، الطريقه الاولى لم يعرف كيف انفذها اما الثانيه فلم تعمل
وشكراً
الأخ فوزي
أرسل لي الملف على بريدي في أسفل التوقيع .
ولك تحياتي
قم بكتابة هذا الكود في أجراء عند فتح النموذج ...
Dim tmprs As Recordset
set tmprs=Me.RecordsetClone
if tmprs.RecordCount=0 then
Msgbox"رسالة عدم وجود بيانات",.,"عفواً البيانات غير موجودة "
cancel=true
End if
وبالتوفيق
السلام عليكم ,,,,
يعطيكم الله آلف عافية أخيراً اشتغل النموذج بطريقة الاخ (فتى الوادي )
شكرا لك من ساعد او حاول ان يساعد
فوزي
هذا الموضوع مغلق.