مساعدة في إظهار حقل النص في نموذج فرعي

[nssj]

الإخوة الكرام في الملف المرفق جدول رئيسي (TAB) مرتبط بعدة جداول بعلاقة متعدد مع متعدد عبر جدول وسيط (TAB_Books_X)

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

 

 ولكن المطلوب أن يظهر حقل النص بجانب رقم الحديث، أعني حقل النص الموجود في جداول الكتب .. ولم أستطع أن أطبق هذا الأمر

وامر آخر .. هل يمكن أن تكون جداول الكتب في مجلد آخر على الجهاز وليس داخل قاعدة البيانات هذه .. لأنها عددها كبيير ؟؟

MusndWZwayid 7.accdb

[محمد أبوعبدالله]

السلام عليكم

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

تم اضافة جدول TAB الى الاستعلام الموجود بنموذج 2 frm_Q_books وربط حقل Nass

MusndWZwayid 7.rar

15 ساعات مضت, nssj said:

وامر آخر .. هل يمكن أن تكون جداول الكتب في مجلد آخر على الجهاز وليس داخل قاعدة البيانات هذه .. لأنها عددها كبيير ؟؟

يمكن وبتم ربط الجداول بقاعدة البيانات الحالية

تحياتي

[jjafferr]

3 ساعات مضت, محمد أبوعبدالله said:

يمكن وبتم ربط الجداول بقاعدة البيانات الحالية

 

مثلا: الجدول X في البرنامج الخارجي ، و الاستعلام X هو للجدول X ، ولكن فيه الحقول المطلوب التعامل معها فقط ، بدلا من جميع حقول الجدول.

 

أ. بعمل رابط للجدول X في البرنامج الذي تشتغل عليه ، فيصبح كأي برنامج عادي ، واذا اردنا ان يكون للقراءة فقط ، فيا نعمله في الاستعلام او النموذج ،

او

ب. عمل استعلام مباشرة في قاعدة البيانات ، للجدول/استعلام X ، وهنا نستطيع ان نجعل البيانات للقراءة فقط من استعلام مباشرة برنامجك :

1. في برنامجك ، اعمل استعلام جديد ، وادخل فيه اسم مسار البرنامج الذي يحتوي على الجدول/استعلام X

.

2. انقر لفتح الجداول والاستعلامات التابعة لذلك البرنامج ،

3. اختر الجدول/الاستعلام X واستعمل الحقول ، 

4. اذا اردت ان يكون الاستعلام للقراءة فقط :

.

او

ج. بالكود تستطيع ان تربط الجدول/الاستعلام X كمصدر بيانات لإستعلام في برنامجك ، ويمكن ان يكون هذا الاستعلام بالكود ايضا ،

د. نفس طريقة ج اعلاه ، ولكن لقراءة الجدول/الاستعلام X مباشرة في الكود 🙂

 

الطريقة التي افضّلها انا ، هي الفقرة ب ، لأنها سهلة وتتعامل معها بطريقة عادية 🙂

 

** ملاحظة: في حال تم تغيير مكان البرنامج الذي يحتوي على الجدول/الاستعلام X ، يجب تغيير المسار لجميع الفقرات اعلاه 🙂

 

جعفر

[nssj]

4 ساعات مضت, محمد أبوعبدالله said:

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

تم اضافة جدول TAB الى الاستعلام الموجود بنموذج 2 frm_Q_books وربط حقل Nass

شكرا لك أخي الكريم .. لكن يظهر أني لم أوضح المطلوب بشكل جيد

المطلوب أكرمك الله أن يظهر النص من الكتاب الموجود في الاستعلام، ففي الصف الذي فيه: (ثلاثيات البخاري) رقم الحديث (3) يظهر نص هذا الحديث من ذلك الكتاب، من جدوله (20101) مباشرة، وليس نص الحديث من الجدول الرئيسي (TAB)

وهكذا في كل حديث

 

16 دقائق مضت, jjafferr said:

مثلا: الجدول X في البرنامج الخارجي .. .. .. ..

🤔 😐 .. شكلو كلام دسم كثيير .. بس أخلص أشغال اليوم بحاول أستوعبوا بالليل مع إبريقين شاي 😁

[محمد أبوعبدالله]

16 ساعات مضت, nssj said:

رقم الحديث (3) يظهر نص هذا الحديث من ذلك الكتاب، من جدوله (20101) مباشرة، وليس نص الحديث من الجدول الرئيسي (TAB)

جرب المرفق الجديد وارجو ان يكون هو طلبك

MusndWZwayid 7.rar

تحياتي

[nssj]

أخي الكريم .. أنا عدلت على الكود الذي تفضلت به من

=DLookUp("[nass]","[20101]","[id] =" & [HNO])

فأصبح

=DLookUp("[nass]","[20101]","[HNO] =" & [HNO])

 وبهذا أصبح يحضر رقم الحديث المطلوب .. لكن تبقى قضية اختلاف الكتاب

فالمطلوب أن يحضر النص من جدول الكتاب المذكور في حقل (BookName)

وبعبارة أخرى .. أن يتغير رقم الجدول في الكود [20101]  بتغير اسم الكتاب في (BookName)

فإذا كان الكتاب (حديث أبي إسحاق) يحضر الحديث من جدول (50011)

وإذا كان الكتاب (مجلس في الحديث) يحضر الحديث من جدول (50012)

وهكذا في حالة وجود كتب أخرى .. وأسماء الكتب وأرقام جداولها من جدول (TAB_Books)

[محمد أبوعبدالله]

استخدم استعلام توحيد لدمج الجداول التي تريد البحث فيها جميعا

كالتالي

SELECT * FROM 20101 
UNION
SELECT * FROM 50011
UNION
SELECT * FROM 50012;

بشرط ان تكون جقول الجداول متماثلة مع باق الجداول

MusndWZwayid 7.rar

تحياتي

[nssj]

لا تزال المشكلة قائمة أخي الكريم، وهي إجضار النص من الكتاب الصحيح

في الصورة المرفقة

أول حديثين هما من كتاب (ثلاثيات البخاري) ولكنه أحضر النص من كتاب (حديث أبي إسحاق)

[محمد أبوعبدالله]

15 ساعات مضت, nssj said:

أول حديثين هما من كتاب (ثلاثيات البخاري) ولكنه أحضر النص من كتاب (حديث أبي إسحاق)

حسناً اخي الكريم جرب الكود التالي

=DLookup("nass"; "AllData"; "[HNO] = " & [HNO] & " And [MNO] = '" & MNO & " '")

MusndWZwayid 7.rar

تحياتي

[د.كاف يار]

تفضل هذا التعديل اخي الكريم

في داخل الاستعلام

Nz(DLookUp("[nass]";[TAB_Books_X]![BookNO];"[Mno]='" & [TAB_Books_X]![MNO] & "' And [Hno]=" & [TAB_Books_X]![HNO]);"-")

 

MusndWZwayid 7.accdb

[nssj]

5 ساعات مضت, محمد أبوعبدالله said:

حسناً اخي الكريم جرب الكود التالي

أخي الكريم ..لا يزال هناك خلل في إحضار النص من الكتاب الصحيح

4 ساعات مضت, د.كاف يار said:

تفضل هذا التعديل اخي الكريم

أخي الكريم .. يبدو أن هناك تحسن .. ولكن ليس كل الأحاديث يتم إحضار نصها، انظر الصورة المرفقة للاستعلام

[د.كاف يار]

جرب هذا التعديل

و لا تنسى بأنك لم ترفق كامل المكتبة يتعين عليك نقل التعديل لبرنامج الاساسي لكي تجد النتيجة

 Nz(DLookUp("[nass]";[TAB_Books_X]![BookNO];"[Mno] LIKE '*" & [TAB_Books_X]![MNO] & "*' And [Hno]=" & [TAB_Books_X]![HNO]);"-")

 

MusndWZwayid 7.accdb

[nssj]

1 ساعه مضت, د.كاف يار said:

جرب هذا التعديل

أخي الكريم .. عدلت الكود في الاستعلام ليصبح هكذا

Nz(DLookUp("[nass]",[TAB_Books_X]![BookNO],"[Hno] LIKE '*" & [TAB_Books_X]![HNO] & "*' And [Hno]=" & [TAB_Books_X]![HNO]),"-")

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

وللتأكد زدت كتابا جديدا للتجربة وكانت النتيجة جيدة بحمد الله .. وهذا الملف بعد التعديل لإلقاء النظرة الأخيرة من المختصين قبل الاعتماد

MusndWZwayid 8.accdb

[د.كاف يار]

5 ساعات مضت, nssj said:

أخي الكريم .. عدلت الكود في الاستعلام ليصبح هكذا

Nz(DLookUp("[nass]",[TAB_Books_X]![BookNO],"[Hno] LIKE '*" & [TAB_Books_X]![HNO] & "*' And [Hno]=" & [TAB_Books_X]![HNO]),"-")

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

وللتأكد زدت كتابا جديدا للتجربة وكانت النتيجة جيدة بحمد الله .. وهذا الملف بعد التعديل لإلقاء النظرة الأخيرة من المختصين قبل الاعتماد

MusndWZwayid 8.accdb 836 kB · 0 downloads

 

طيب الحمد الله على البركة

موفق خير انشاء الله في خدمتك في اي وقت