السلام عليكم ورحمة الله وبركاته
يا جماعة في خطأ حاصل معاية ، خطأ غريب جداً
الخطأ في في الكود التالي :
If rs.RecordCount = 0 Then Comman1.Enabeld = False End If
المشكلة هنا أن الكود لا يتم تنفيذه حتى و لو الجدول فارغ من البيانات :blink:
و كمان الــ rs.RecordCount ترجع بقيمة [ -1] لما يكون الجدول فارغ
ومن الآخر حاصل معايا لخبطة جامدة :wacko:
ممكن المساعدة أو التوضيح
أنا استخدم ADO
من المكتبة : Microsoft ActiveX Data Objects 2.1 Library
و جزاكم الله خيراً -_-
بسم الله
الاخ الكريم
من الظاهر انك تريد ... عندما لا يكون هناك اي سجل مخزن في القاعدة ان يقوم بإلغاء تفعيل زر الحفظ مثلا او خلافه مثل الحذف او التعديل .... كذا صح ولا :(
طيب
اول شي هل انت واضع الكود في الحدث onload الخاص بالفورم ولا .. لا ؟ :blink:
ثاني شي الرقم (-1) يظهر لك بين حاصرتين ولا ..؟ :unsure:
يعني انت وين واضع الكود ؟
اول شي ضع الكود في الاون لود حق الفورم ...
ثاني شي ليش ما تجرب تضع (-1) بدلا من (0) ... شوف ايش يطلع لك الرد...
تحياتي لك
خالد
إذا كان ترك الدين يعني تقدما ***** فيا نفس موتي قبل أن تتقدمي
اعط الفقير سمكة يشبع يوما * * * * علمه الصيد يشبع مدى الحياة
قتل امرئٍ في غابةٍ ***** جريمة لا تغتفـر
وقتل شعبٍ بأكمله ****** مسألةٌ فها نظر
حتى الكلاب إذا رأت يوماً فقيراً ماشياً *** نبحت عليه وكشرت أنيابها
المبرمج الطيب كتب:اول شي هل انت واضع الكود في الحدث onload الخاص بالفورم ولا .. لا ؟ :blink:ثاني شي الرقم (-1) يظهر لك بين حاصرتين ولا ..؟ :unsure:
يعني انت وين واضع الكود ؟
اول شي ضع الكود في الاون لود حق الفورم ...
1. نعم أخي الكريم الكود في الـ Form_Load
2. أنا عملت Label لكي أعرف الــ RecordCount فظهر لي الرقم < -1 > بدون حاصرتين
3. لما أضع الشرط التالي :
If rs.Recordcount = -1 Then Command1.Enabeld = False End If
يظل المفتاح غير مفعل حتى و لو أصبح الجدول به بيانات
و جزاك الله خيراً على تفاعلك معي أخي الكريم
اخي الكريم افتح الريكوردست في وضع adopenStatic
وسوف تحل هذه المشكلة بإذن الله
حتى لا تعود الدالة RecordCount بـ -1 استخدم AdopenStatic كالمثال ادناه
Rs.Open "Select * from MyTable",Con,adOpenStatic ,adLockOptimistic
تحياتي
تم تعديل هذه المشاركة بواسطة omani في 7 مارس 2006 في 20:47
OMANI FOR EVER
-------------------------------------------------
-------------------------------------------------
نعم فعلاً قد يكون هذاهو السبب لأني
فتحت الجدول في و ضع ديناميكي
rs2.Open "User_" & rs![User_No], db, adOpenDynamic, adLockOptimistic
سأجرب و أرد عليك
جزاك الله كل خير أخي الكريم omani
أشكرك أخي الكريم omani
لقد عملت معي بالفعل
أشكرك مرة أخى و أشكر الأخ المبرمج الطيب على التفاعل معي (h)
هذا الموضوع مغلق.