بسم الرحمن الرحيم
اخواني انا عملت الكود هذا وهو اذا في جدول prod اصناف كمياتهم اقل من صفر تطلع لي رسالة:
If DLookup("[numbercrt]", "[prod]", "[numbercrt]<0") Then
MsgBox "هناك اصناف كمياتهم اقل من صفر", vbInformation, "تحذير"
End Ifحاولت ولكن لم ينجح تطلع لي الرسالة حتى لو اكبر من صفر او اصغرمن الصفر او حتى صفر :wacko: الرجاء مساعدتي باسرع وقت ممكن لان موعد تسليم البرنامج يوم الخميس
اخوكم محمد الخدر :(
أخي الكريم : من النظرة الأولى أعتقد أن الخطأ هو وضعك اسم الجدول بين قوسين كبيرين [ ]
والصحيح أن يكون اسم الجدول بين علامتي التنصيص " "
إذ أن الــ [ ] لإسما الحقول في الجدول
والـ " " لإسم الجدول فيصبح الكود هكذا بعد التصحيح
If DLookup("[numbercrt]", "prod", "[numbercrt]<0") Then
MsgBox "هناك اصناف كمياتهم اقل من صفر", vbInformation, "تحذير"
End Ifوالله أعلم إذ انني لم أجرب ذلك عمليا الأن ربما توجد أخطأ أخرى في اسماء الحقول مثلا تأكد من كل شيء.. موفق دوما وابدا
EKSEER
تم تعديل هذه المشاركة بواسطة ekseer في 20 نوفمبر 2007 في 03:23
اخي شكراً جزيلاً فعلاً نجح الكود نجاحاً باهراً
اخوك محمد الخدر :lol:
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…