اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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

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

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

 

ولكن لم يعمل  

New Microsoft Access Database.accdbFetching info...

قام بنشر
  في 1‏/10‏/2023 at 16:45, زياد الحسناوي said:

لكن لم يعمل  

Expand  

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

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

New Microsoft Access Database.accdbFetching info...

قام بنشر
  في 1‏/10‏/2023 at 21:46, الحلبي said:

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

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

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

Expand  

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

قام بنشر (معدل)
  في 1‏/10‏/2023 at 16:45, زياد الحسناوي said:

ولكن لم يعمل

Expand  

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

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

 

New Microsoft Access Database.zipFetching info...

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

 

تم تعديل بواسطه Foksh
قام بنشر
  في 1‏/10‏/2023 at 23:02, Foksh said:

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

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

 

New Microsoft Access Database.zip 100.85 kB · 2 downloads

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

 

Expand  

شكرا جزيلا 

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

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

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

قام بنشر
  في 2‏/10‏/2023 at 06:58, زياد الحسناوي said:

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

Expand  

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

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

New Microsoft Access Database.zipFetching info...

قام بنشر
  في 2‏/10‏/2023 at 09:39, Foksh said:

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

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

New Microsoft Access Database.zip 108.36 kB · 0 downloads

Expand  

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

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

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

قام بنشر
  في 2‏/10‏/2023 at 10:27, زياد الحسناوي said:

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

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

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

Expand  

 

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

New Microsoft Access Database.zipFetching info...

  • Like 1
قام بنشر
  في 2‏/10‏/2023 at 11:15, Foksh said:

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

Expand  

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

  • Thanks 1
قام بنشر
  في 2‏/10‏/2023 at 13:21, الحلبي said:

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

Expand  

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

قام بنشر
  في 2‏/10‏/2023 at 11:15, Foksh said:

 

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

New Microsoft Access Database.zip 54.02 kB · 5 downloads

Expand  

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

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

 

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

 

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

New Microsoft Access Database.accdbFetching info...

قام بنشر (معدل)
  في 2‏/10‏/2023 at 16:33, دروب مبرمج said:

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

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

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

Expand  

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

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

 

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

 

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

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

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

تم تعديل بواسطه زياد الحسناوي
قام بنشر
  في 2‏/10‏/2023 at 17:52, دروب مبرمج said:

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

 

بحث.mdb 452 kB · 0 downloads

Expand  

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

 

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

قام بنشر
  في 2‏/10‏/2023 at 18:21, دروب مبرمج said:

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

 

بحث.mdb 492 kB · 0 downloads

Expand  

عاشت ايدك 
 

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

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

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

قام بنشر
  في 2‏/10‏/2023 at 18:41, زياد الحسناوي said:

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

Expand  

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

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

قام بنشر
  في 2‏/10‏/2023 at 18:21, دروب مبرمج said:

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

 

بحث.mdb 492 kB · 3 downloads

Expand  

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

Date.accdbFetching info...

قام بنشر
  في 2‏/10‏/2023 at 18:41, زياد الحسناوي said:

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

Expand  

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

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

image.png.81d0a1ece76300aebfda3d0f190f6163.png

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

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

 

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

قام بنشر
  في 2‏/10‏/2023 at 18:49, دروب مبرمج said:

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

Expand  

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

 

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

قام بنشر (معدل)
  في 2‏/10‏/2023 at 18:21, دروب مبرمج said:

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

 

بحث.mdb 492 kB · 3 downloads

Expand  

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

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

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

تم تعديل بواسطه زياد الحسناوي

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information