مساعدة في فحص كود - ملف 2003

تفضل ، اطال الله في عمرك :)

Private Sub subaccount_AfterUpdate()

Me.subaccountcode = Me.subaccount.Column(2)
Me.statment = DLookup("[statment]", "accounts", "[id] = " & [subaccountcode])
End Sub

جعفر

الكود يعمل بكفاءة جزاكم الله كل خير وجعله في ميزان حسناتك اخي واستاذي الكريم / جعفر .....

افادكم الله وزادك من علمه ....

حياك الله :)

التقييم غداً بمشيئة الله لقد وصلت الحد الأقصى للتقييم اليوم :)

الله ان شاء الله يطول في عمرك اخوي وجزاك الله خير الدنيا والآخرة :)

انا ما يهمني التقييم ، المهم اني قدرت اخدمك :)

جعفر

دعاء من اعماق قلبي أن يجزيك الله كل خير عن نواياك الطيبة وعن مساعدتك لي والأخرين لوجه الله ربي يكرمك ويكرم والديك ....تحياتي لك

اخي واستاذي الكريم / جعفر ...

السلام عليكم ورحمة الله ....

أرجو منك اصلاح الخطأ الموجود بقاعدة البيانات بعد ان قمت بالتعديل عليها حيث اني حذفت العلاقة بين SUBACCOUNT ID و بين حقل SUBACCOUNT وجعلتها بين ID و SUBACCOUNT كمفتاح اساسي

 فحدث خطأ ما اريد إصلاحه ....تحياتي لك ولكل المشاركين ....

77.‫MSH-ACC.rar

هلا والله :)

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

اذا انا ما غلطان ، مشكلتك في الارقام 1 2 3 4 في الصورة المرفقة ، وخبرني اذا في شئ آخر :)

جعفر

معلش اعذرني لم افهم ما تقصده !!!

افتح الجدول في وضع التصميم

اختر الحقل subaccount

انظر في تخصيصات الحقل في الاسفل ، ثم اختار Lookup

اختر السطر الذي عليه رقم 1 بالاحمر ، وسيظهر لك زر به 3 نقاط على اليمين

اضغط الزر وستدخل في الاستعلام الذي عملته انت سابقا

اصلح الاستعلام ، وعلى اساس هذا التصليح غير في الارقام الحمراء 2 3 و4

المفروض بعد التصليح ، ان ينفتح الجدول بدون اخطاء ، وجرب ادخال بيانات مباشرة في الجدول في الحقل subaccount

جعفر

فقط ما أريده هو التعديل على الكود 

rivate Sub subaccount_AfterUpdatep()

Me.subaccountcode = Me.subaccount.Column(2)

ليتناسب مع التصميم الجديد للجدول والعلاقات الجديدة

جزاكم الله كل خير على محاولتكم تعليمي الصيد بدلاً من اعطائي السمكة سأحاول وان فشلت استحملني ساحتاج مساعدتك وسأعاود الاستفسار منكم 

وإن أصبت فجزاك الله كل خير عني وسأخبركم ... :)

لم أصل لحل استاذي الفاضل ...

اخبرني بالله عليك ماذا أصنع ؟؟؟

ونفس المشكلة في مربع السرد في النموذج :(

المرفق تم تصليحه :)

والكود صار

Me.subaccountcode = Me.subaccount.Column(1)

جعفر

66.2..‫MSH-ACC.mdb.zip

جزاكم الله كل خير وبارك لك في وقتك وعلمك .....+1

حياك الله :)

استاذي الكريم / جعفر

السلام عليكم

اعلم اني قد اثقلت عليك في الطلب 

ولكني في المرحلة الاخيرة بمشيئة الله وانا ممنون لك ولك اساتذتي في هذا المنتدى الرائع ومنتدى اوفسينا ....لما قدمتوه لي من دعم ومساعدة

اتمنى منك ان تقوم باصلاح ما قد يوجد من اخطاء في الملف المرفق استكمالاً لاكواد سبق وان اعددتها لي مشكوراً ولكن يبدوا ان نفس الخطأ يحدث معي كل مره فاتمنى على الله ان تصلح الخطأ تحياتي لك ولك الاساتذة المحترمين .....

الشرح في فورم add account وهي نفس مشكلتي السابقة والتي تفضلتم بحلها سابقاً 

بارك الله فيكم 

لو هناك اي لبس ارجوا الافادة لاقوم بتوضيح اكثر 

‫‫MSH-ACC.rar

up

تفضل اخي :)

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

في الصورة التالية:

1. اسم الحقل الذي سنعمل عليه ،

2. بما اننا سنختار البيانات من الجدول ، لذا يجب اختيار Table/Query ،

3. يجب الضغط على هذا الزر للدخول لعمل استعلام للبيانات المطلوبة ،

4. هذا رقم العمود الموجود في الاستعلام (الذي سنكون قد عملناه في الخطوة 3 ، لاحظ اللون الاحمر في الاستعلام في الصور التالية) ،

    وقيمة هذا العمود ستحفظ في الجدول ، ولا يشترط ان تكون هي نفسها القيمة التي تظهر (في عمود الحساب الفرعي) في النموذج ،

   وفي حالتنا هنا ، فالقيمة التي ستحفظ في الجدول (تابع في الخطوات التاليه) ستكون رقم ID ، بينما القيمة التي تظهر في النموذج هي subaccount ،

في الصورة التالية:

الارقام الحمراء ، هي اسماء/ارقام الاعمدة التي تستخدم في مواصفات الحقل (مثل ما هو الحال في الصورة الاعلى) ،

بينما الارقام الزرقاء ، هي اسماء/ارقام الاعمدة التي تستخدم في الكود (كما سنلاحظ في احد الصور التالية) ،

ويجب ملاحظة اننا اخترنا الجدول Accounts ، واخترنا الحقول ، وضعنا الحقول بهذا الترتيب لاننا نريدها كذلك ، وكان يمكننا ان نغير في تسلسلها ،

ثم عند خروجنا من الاستعلام (بالضغط على زر الخروج) ، نؤكد الطلب لحفظ واستخدام  هذه المتغيرات ،

الآن اصبح واضحا استخدامنا للعمود رقم 2 ،

في الصورة التالية:

1. يجب كتابة عدد الاعمدة الموجودة في الاستعلام ،

2. عرض كل عمود ، وكما نلاحظ ان عندنا 3 اعمدة ،  فيهما العمود الثالث عرضها صفر (اي لا نظهر هذا العمود في النموذج عند سرد الحقل) ،

3. بما اننا لا نريد ان نرى اسماء الاعمدة (اي : ID  subaccount) ، اي انه مجرد اظهار اسم كل عمود عند سرد الحقل ،

4. وهذا مجموع عرض الاعمدة: 2.5 + 2.5 + 0 (ولا مانع من جعل هذا الرقم اكبر) ،

الآن في الكود في الحدث ، بعد تحديث نفس الحقل (subaccount) ،

نأخذ قيمة الحقل subaccountcode ، من العمود الاول (من الاستعلام) من الحقل subaccount ،

نأخذ قيمة الحقل statment ، من العمود الثاني (من الاستعلام) من الحقل subaccount ،

وعليه ، نتوصل الى هذه النتيجة:

جعفر

66.3..‫MSH-ACC.mdb.zip

استاذي الكريم / جعفر

رغم المجهود الاكثر من رائع من قبلكم جزاكم الله كل خير

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

والشرح في الفورم ADD ACCOUNT 

باختيار اسم الحساب من COMBO BOX يظهر لي المجموعة  GROUP التابع لها الحساب والتصنيفCAT  والقائمة المالية STATMENT

واكرر اسفي عن ازعاجكم وتكرار طلباتي ولا ادري هل هذا يرجع لعدم استيعابي للخطوات ام انه انخفاض في مستوى قدراتي .... :)

تحياتي لك يا استاذي العزيز ....ارجو من الله ان يتم تلبية طلبي عندما يكون لديك الوقت الكافي لذلك ....

والسلام عليكم ورحمة الله 

‫‫MSH-ACC.rar

اخي علاء :)

انا وضحت لك ما عملته بالصور ، 

ولكن قاعدة البيانات المرفقة هي جاهزة وتحتوي على الذي تم شرحه ،

يعني انزل قاعدة البيانات المرفقة مع مشاركتي السابقة ، واستعملها ، فهي جاهزة للعمل.

جعفر

واذا كان في شئ آخر ، رجاء ابداء الملاحظة :)

جعفر

معذرة يا استاذي هذه فورم غير الاولى 

في الفورم الجديد اضافة حساب مرتبطة بفورم الدليل ...

هي غير المرفق الاول تماماً ....

تحياتي لك وشكراً على اهتمامك بالرد

هل هذا المطلوب؟

جعفر

66.4.‫‫MSH-ACC.mdb.zip