طلب تصحيح هذا الكود

وعليكم السلام

هذا التصحيح

Me.MM = DSum("[mony _mgadm]", "akaed", "[no_akad] ) IS NULL")

وأرجو أن أكون قد وفقت

اخوي اشكرك على الرد

والكود مازال خطاء

حيث ان العبارة الاولى لجدول والثانية لجدول

للرفع

اخي الفاضل بن حامد

هل من الممكن ترفع الملف الخاص بك هنا او حتى مثال قريب منه ليتم معرفة الحقول والجداول بشكل صحيح ومن ثم كتابة الكود بشكل صحيح

اشكرك اختي ام عهود

واليك الملف وارجو ان يكون المبلغ الذي ينتج عن الكود يكون مطابق لمبلغ الاستعلام

حيث اريد ان الغي الاستعلام تماما واكتفي بالكود مادام يعطيني نفس النتيجة

واشكرك

db1.rar

تفضل اخي الكريم

قم بتجربة هذا الكود

MM: DLast("[mony _mgadm]";"akaed";[no_akad]=DLookUp("[no_akad]";"close_akaed"))

اختي الفاضلة

وضعت الكود و لا يمكن التعرف على الحقل علما أن تسمية الحقل صحيحة ماادري وش المشكة ياليت يا أم عهود تعدلين المثال وترفعينه أشكرك

اخي الفاضل

لا يوجد ا ي مشكلة في تسميات الحقول فهي مأخوذه فعلا من حقول الجداول

سواء في النموذج او الإستعلام النتائج متطابقه ( يعني وضعت لك الطريقتين )

aben_hamid_UP.rar

طيب اذا كان النموذج غير مبني على جدول طبعا يكون الحقل غير منظم كيف يجيب القيمة اعذريني

عندما يكون النموذج غير منضم ( لا يوجد له مصدر سجل

يكون لدينا طريقتين

الطريقة الأولى : اسناد التعبير مباشرة في الحقل بهذه الطريقة

=DLast("[mony _mgadm]";"akaed")

الطريقة الثانية : نترك الحقل فارغ من اي تعبير ثم ننتقل الى محرر الفيجول بيسك ونضع هذا الكود في حدث الحالي

Private Sub Form_Current()
Me![sText] = DLast("[mony _mgadm]", "akaed")
End Sub

والنتيجة كلها واحده

وضعتها مثل ذلك ولكن الطريقة الاولى تعطي خطاء والطريقة الثانية لايمكن العثور على الحقل اشكرك

aben.hamid كتب:

وضعتها مثل ذلك ولكن الطريقة الاولى تعطي خطاء والطريقة الثانية لايمكن العثور على الحقل اشكرك

بالتأكيد لديك خطأ ما

تفضل هذا نموذجين بالطريقتين

aben_hamid_UP2.rar

ضعي الكود كاملا ولاحظي النتيجة

Me.MM = DSum("[mony _mgadm]", "akaed", "[no_akad] )= [CLOSE_AKAED]![no_akad]=[IS NULL]