مشكلة بنموذج البحث المتعدد

[زياد الحسناوي]

قمت بأنشاء فورم MultiSearch لعمل بحث عام عن الكتب الصادرة والوارد 

وعند اختيار اي خانة من الخانات الموجودة في النموذج مع اختيار نوع الكتاب (صادر او وارد)

يقوم باظهر النتائج من خلال احد الفورمين MultiSearchward  او MultiSearchsadr حسب نوع الكتاب 

 

ولكن لم يعمل  

New Microsoft Access Database.accdb

[زياد الحسناوي]

نفس المشكلة بتقرير البحث بين تاريخين لا يستخرج القيم الصحيحة عن البحث

New Microsoft Access Database (2).accdb

[الحلبي]

4 ساعات مضت, زياد الحسناوي said:

لكن لم يعمل  

حسب ما فهمت من الموضوع انك وضعت فى الاستعلام الاول المعايير بجانب بعضها 

انا وضعتهم تحت بعض شوف هذا طلبك ام لا

New Microsoft Access Database.accdb

[زياد الحسناوي]

5 دقائق مضت, الحلبي said:

حسب ما فهمت من الموضوع انك وضعت فى الاستعلام الاول المعايير بجانب بعضها 

انا وضعتهم تحت بعض شوف هذا طلبك ام لا

New Microsoft Access Database.accdb 1.51 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 0 downloads

الصادر الان اذا بحثت عنه المفروض تظهر 8 كتب ولكن يظهر كتاب واحد فقط 

[Foksh]

6 ساعات مضت, زياد الحسناوي said:

ولكن لم يعمل

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

وتستطيع الإستغناء عن الإستعلامين ( MultiSearchSadr و MultiSearchWard ) ، لأني قمت بدمجهم في استعلام واحد

 

New Microsoft Access Database.zip

نقطة مهمة ، فقد جعلت نماذج النتائج غير قابلة للإضافة كونها مبنية على استعلام وليس جدول ( فلن تستطيع التخزين من خلالها او التعديل ؛ لذا فلا حاجة لتكون قابلة للإضافة أو التعديل أو الحذف )

 

تم تعديل أكتوبر 1, 2023 بواسطه Foksh

[زياد الحسناوي]

7 ساعات مضت, Foksh said:

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

وتستطيع الإستغناء عن الإستعلامين ( MultiSearchSadr و MultiSearchWard ) ، لأني قمت بدمجهم في استعلام واحد

 

New Microsoft Access Database.zip 100.85 kB · 2 downloads

نقطة مهمة ، فقد جعلت نماذج النتائج غير قابلة للإضافة كونها مبنية على استعلام وليس جدول ( فلن تستطيع التخزين من خلالها او التعديل ؛ لذا فلا حاجة لتكون قابلة للإضافة أو التعديل أو الحذف )

 

شكرا جزيلا 

ولكن المشكلة الان اذا قمت باختيار نوع الكتاب (صادر) فقط و تضغط لاظهار النتائج فانها لا تظهر 

وكذلك عند اختيار نو الكتاب (صادر) و الوحدة (وحدة الحسابات) من مربع الخاص بكتب الصادر لا تظهر نتائج 

ونفس الحالة بالنسبة للوارد

[Foksh]

2 ساعات مضت, زياد الحسناوي said:

ولكن المشكلة الان اذا قمت باختيار نوع الكتاب (صادر) فقط و تضغط لاظهار النتائج فانها لا تظهر

اعتذر اخي الكريم الخطأ مردود ، تم التعديل تفضل

واخبرني بالنتيجة

New Microsoft Access Database.zip

[زياد الحسناوي]

46 دقائق مضت, Foksh said:

اعتذر اخي الكريم الخطأ مردود ، تم التعديل تفضل

واخبرني بالنتيجة

New Microsoft Access Database.zip 108.36 kB · 0 downloads

استعفر الله ماكو داعي للاعتذار 

حاليا من اختار نوع الكتاب صادر تمام التمام

ولكن عند اختيار نوع الكتاب صادر + رقم الكتاب 1 لا يعمل بصورة صحيحة وكذلك بالنسبة لباقي المعايير

[Foksh]

46 دقائق مضت, زياد الحسناوي said:

استعفر الله ماكو داعي للاعتذار 

حاليا من اختار نوع الكتاب صادر تمام التمام

ولكن عند اختيار نوع الكتاب صادر + رقم الكتاب 1 لا يعمل بصورة صحيحة وكذلك بالنسبة لباقي المعايير

 

هذا المرفق المفروض هو الصحيح ، أرفقت القديم في المشاركة السابقة سهواً 

New Microsoft Access Database.zip

[الحلبي]

2 ساعات مضت, Foksh said:

هذا المرفق المفروض هو الصحيح

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

[Foksh]

2 ساعات مضت, الحلبي said:

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

هذا من طيب اصلك اخوي 

[زياد الحسناوي]

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

 

هذا المرفق المفروض هو الصحيح ، أرفقت القديم في المشاركة السابقة سهواً 

New Microsoft Access Database.zip 54.02 kB · 5 downloads

ولا يهمك استاذ 
ازعجتك انا 

ولكن عند اختيار فقط صادر او فقط وارد لا تظهر النتائج هاي اولا

 

ثانيا عند اختيار مثلا عند اختيار صادر و مدخل البيانات زياد 

 

يظهر جميع الكتب سواء اذا كانت صادر او وارد تم ادخالها عن طريق زياد 

New Microsoft Access Database.accdb

[دروب مبرمج]

تفضل هذه المشاركة مع معلمي الكبير أ. @Foksh

للبحث الكي و الجزئي لأي حقل غير الرقمي

البحث.accdb

[زياد الحسناوي]

29 دقائق مضت, دروب مبرمج said:

تفضل هذه المشاركة مع معلمي الكبير أ. @Foksh

للبحث الكي و الجزئي لأي حقل غير الرقمي

البحث.accdb 700 kB · 0 downloads

نفس المشكلة مستمرة 

عند اختيار نوع الكتاب صادر يظهر كتاب واحد فقط 

 

وعند اختيار وارد لا تظهر نتائج ويتوقف البرنامج عن العمل

 

المطلوب من البحث المتعدد 

اذا تم اختيار فقط نوع الكتاب (صادر / وارد) يظهر كل البريد الصادر فقط لو كل البريد الوارد فقط

وعند اختيار صادر مع مدخل البيانات او ربط الكتاب او الوحدة او اي معيار اخر يتم الفلترة حسب الاختيارات

تم تعديل أكتوبر 2, 2023 بواسطه زياد الحسناوي

[دروب مبرمج]

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

 

بحث.mdb

[زياد الحسناوي]

6 دقائق مضت, دروب مبرمج said:

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

 

بحث.mdb 452 kB · 0 downloads

تم التجربة عند اختيار صادر يظهر كتاب واحد فقط بينما عدد الكتب الصادرة 8 

 

وعندي اختيار الكتاب صادر مع رقم الكتاب لا تظهر نتائج

[دروب مبرمج]

اذا هذا هو الحل تغيير العلاقات

 

بحث.mdb

[زياد الحسناوي]

4 دقائق مضت, دروب مبرمج said:

اذا هذا هو الحل تغيير العلاقات

 

بحث.mdb 492 kB · 0 downloads

عاشت ايدك 
 

بس سؤال كيف تم ذلك ؟ 

وما يعني هذا الكود 

[Forms]![MultiSearchSadr].Form.RecordSource = df

[دروب مبرمج]

4 دقائق مضت, زياد الحسناوي said:

[Forms]![MultiSearchSadr].Form.RecordSource = df

RecordSource
يعني اعادة تعيين مصدر البيانات 

مصدر البيانات الجديد ضمن الكود مع معايير البحث

[زياد الحسناوي]

24 دقائق مضت, دروب مبرمج said:

اذا هذا هو الحل تغيير العلاقات

 

بحث.mdb 492 kB · 3 downloads

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

Date.accdb

[دروب مبرمج]

6 دقائق مضت, زياد الحسناوي said:

بس سؤال كيف تم ذلك ؟ 

المشكلة كانت في العلاقات لم يكن هنالك علاقة بين الجداول

كل ما عملته هو انشاء علاقة 

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

Sub NewSearsh()
Dim varFilter As Variant
varFilter = Null
 
   If Not IsNull(KindBook) Then: varFilter = (varFilter) & "[KindBook] LIKE '*" & KindBook & "*'"
  
   If Not IsNull(Rbtbook) Then: varFilter = (varFilter + " AND ") & "[Rbtbook] LIKE '*" & Rbtbook & "*'"
   If Not IsNull(EntryInfo) Then: varFilter = (varFilter + " AND ") & "[EntryInfo] LIKE '*" & EntryInfo & "*'"
   If Not IsNull(NObook) Then: varFilter = (varFilter + " AND ") & "[NObook] = " & NObook
   If Not IsNull(DateBook) Then: varFilter = (varFilter + " AND ") & "[DateBook] LIKE '*" & DateBook & "*'"
   If Not IsNull(Adbook) Then: varFilter = (varFilter + " AND ") & "[Adbook] LIKE '*" & Adbook & "*'"
   If Not IsNull(SavePlace) Then: varFilter = (varFilter + " AND ") & "[SavePlace] LIKE '*" & SavePlace & "*'"
   If Not IsNull(EtC) Then: varFilter = (varFilter + " AND ") & "[EtC] LIKE '*" & EtC & "*'"
   If Not IsNull([NoW]) Then: varFilter = (varFilter + " AND ") & "[NoW] LIKE '*" & [NoW] & "*'"
   If Not IsNull(DateW) Then: varFilter = (varFilter + " AND ") & "[DateW] LIKE '*" & DateW & "*'"
   If Not IsNull(AljegehaW) Then: varFilter = (varFilter + " AND ") & "[AljegehaW] LIKE '*" & AljegehaW & "*'"
   SubSur = varFilter
End Sub

 

و اخذنا نسخة من الاستعلام لوضعها ضمن الكود و دمج الفلتر معها

[زياد الحسناوي]

3 دقائق مضت, دروب مبرمج said:

و اخذنا نسخة من الاستعلام لوضعها ضمن الكود و دمج الفلتر معها

تمام عاشت ايدك 
ممكن تلقي نظرة على التقرير بين تاريخين

 

وكذلك Module1 من ضمن العمل صح  ؟ 

[زياد الحسناوي]

منذ ساعه, دروب مبرمج said:

اذا هذا هو الحل تغيير العلاقات

 

بحث.mdb 492 kB · 3 downloads

بعد التجربة توجد مشكلة صغيرة

وهي عند اختيار نوع الكتاب (صادر) أو (وارد)
 

و وضع قيم في حقول الخاصة بالصادر مثلا الوحدة فلا تظهر النتائج المطلوبة

تم تعديل أكتوبر 2, 2023 بواسطه زياد الحسناوي

[زياد الحسناوي]

[دروب مبرمج]

تفضل التعديل

 

بحث.mdb