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

[شامل2]

قائمة تحتوي على عمودين:

هل يمكن البحث في القائمة المنسدلة باختيار احدى الطريقتين:

الأولى كود المادة؟ والثانية من خلال اسم المادة؟

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

بحيث يتم وضع نتيجة البحث وهي(اسم المادة) في الحقل الثاني(تفاصيل المواد)

 

 

تم تعديل يونيو 14, 2022 بواسطه شامل2

[متقاعد]

7 ساعات مضت, شامل2 said:

البحث في القائمة المنسدلة باختيار احدى الطريقتين

ممكن باكثر من طريقة

وساشرح طريقة بسيطة

في مصدر القائمة نقوم باضافة حقل يجمع الكود واسم المادة

[الكود]&" "&[اسم المادة]

 لنقوم بالفلترة من خلال هذا الحقل

ولكن هناك بعض الخطوات

في خصائص القائمة تبويب بيانات توسع تلقائي = لا

                         تبويب تنسيق عدد الاعمدة = 3 عرض الاعمدة = 0سم;2سم;3سم

 

الان في حدث عند مفتاح اعلى نضع الكود التالي

If Len(co2.Text) > 0 Then
Me.co2.RowSource = " SELECT [id] & "" "" & [item] AS Expr1, tbl_it.id, tbl_it.item, tbl_it.price " & _
" FROM tbl_it " & _
" WHERE ((([id] & "" "" & [item]) Like ""*"" & [Forms]![frm_3]![co2].[Text] & ""*""));"
     Me.co2.Dropdown
     Else
     Me.co2.RowSource = " SELECT [id] & "" "" & [item] AS Expr1, tbl_it.id, tbl_it.item, tbl_it.price " & _
" FROM tbl_it;"
[tx2] = Null: [tx4] = Null
     End If

co2 هي القائمة المنسدلة tx2 و tx4 هي الحقول التي سيتم اضهار الصنفى وسعر الصنف بها

ثم في حدث بعد التحديث للقائمة نضع الامر

Me.tx2 = Me.co2.Column(2)
Me.tx4 = Me.co2.Column(3)

بالتاكيد توجد طرق اكثر ولكن ساكتفي بهذه الطريقة

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

في الصورة المتحركة في المثال ⬇️ يوجد خطا حيث وضعنا اسم الصنف في حقل السعر والسعر في حقل الصنف

لاني عملت المثال وصورتة وانا مشغول بعمل اخر ولم اراجعة

تحياتي

 

تم تعديل يونيو 14, 2022 بواسطه مبرمج سابق
تنوية

[Eng.Qassim]

10 ساعات مضت, مبرمج سابق said:

في مصدر القائمة نقوم باضافة حقل يجمع الكود واسم المادة

[الكود]&" "&[اسم المادة]

استاذي العزيز @مبرمج سابق او استاذ خالد

لماذا لانجمع الحقلين في استعلام ونجعل المعيار له مساوية لقيمة الكومبوبوكس ؟

[متقاعد]

19 دقائق مضت, Eng.Qassim said:

لماذا لانجمع الحقلين في استعلام ونجعل المعيار له مساوية لقيمة الكومبوبوكس ؟

هذا ما فعلت بالضبط ربما خانني التعبير فكما اشرت عملت المثال وكتبت المشاركة اثناء تناول الافطار 😄

11 ساعات مضت, مبرمج سابق said:

لاني عملت المثال وصورتة وانا مشغول بعمل اخر ولم اراجعة

تم تعديل يونيو 14, 2022 بواسطه مبرمج سابق

[Eng.Qassim]

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

وكتبت المشاركة اثناء تناول الافطا

ان كان ماشغلك هو الافطار ...الف عافية على قلبك

انا افطاري مازال امامي هو شوربة خضار ... حكم العمر يا اخي 😂

[متقاعد]

7 دقائق مضت, Eng.Qassim said:

انا افطاري مازال امامي هو شوربة خضار ... حكم العمر يا اخي

الله يعطيك الصحة والعافيه والشباب شباب القلب

[شامل2]

20 ساعات مضت, مبرمج سابق said:

ممكن باكثر من طريقة

وساشرح طريقة بسيطة

في مصدر القائمة نقوم باضافة حقل يجمع الكود واسم المادة

[الكود]&" "&[اسم المادة]

 لنقوم بالفلترة من خلال هذا الحقل

ولكن هناك بعض الخطوات

في خصائص القائمة تبويب بيانات توسع تلقائي = لا

                         تبويب تنسيق عدد الاعمدة = 3 عرض الاعمدة = 0سم;2سم;3سم

 

الان في حدث عند مفتاح اعلى نضع الكود التالي

If Len(co2.Text) > 0 Then
Me.co2.RowSource = " SELECT [id] & "" "" & [item] AS Expr1, tbl_it.id, tbl_it.item, tbl_it.price " & _
" FROM tbl_it " & _
" WHERE ((([id] & "" "" & [item]) Like ""*"" & [Forms]![frm_3]![co2].[Text] & ""*""));"
     Me.co2.Dropdown
     Else
     Me.co2.RowSource = " SELECT [id] & "" "" & [item] AS Expr1, tbl_it.id, tbl_it.item, tbl_it.price " & _
" FROM tbl_it;"
[tx2] = Null: [tx4] = Null
     End If

co2 هي القائمة المنسدلة tx2 و tx4 هي الحقول التي سيتم اضهار الصنفى وسعر الصنف بها

ثم في حدث بعد التحديث للقائمة نضع الامر

Me.tx2 = Me.co2.Column(2)
Me.tx4 = Me.co2.Column(3)

بالتاكيد توجد طرق اكثر ولكن ساكتفي بهذه الطريقة

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

في الصورة المتحركة في المثال ⬇️ يوجد خطا حيث وضعنا اسم الصنف في حقل السعر والسعر في حقل الصنف

لاني عملت المثال وصورتة وانا مشغول بعمل اخر ولم اراجعة

تحياتي

 

السلام عليكم

اشكر تعاونك اخينا العزيز

لم اتمكن من تحقيق المطلوب؟

[أبوبسمله]

في 14‏/6‏/2022 at 22:54, مبرمج سابق said:

هذا ما فعلت بالضبط ربما خانني التعبير فكما اشرت عملت المثال وكتبت المشاركة اثناء تناول الافطار 😄

بالف هنا وعافيه

في 14‏/6‏/2022 at 23:00, Eng.Qassim said:

ان كان ماشغلك هو الافطار ...الف عافية على قلبك

انا افطاري مازال امامي هو شوربة خضار ... حكم العمر يا اخي 😂

في 14‏/6‏/2022 at 23:08, مبرمج سابق said:

الله يعطيك الصحة والعافيه والشباب شباب القلب

ربنا يديكم الصحه اساتذتى الافاضل ويباركلنا فيكم

[abouelhassan]

في 14‏/6‏/2022 at 11:42, مبرمج سابق said:

ممكن باكثر من طريقة

وساشرح طريقة بسيطة

في مصدر القائمة نقوم باضافة حقل يجمع الكود واسم المادة

[الكود]&" "&[اسم المادة]

 لنقوم بالفلترة من خلال هذا الحقل

ولكن هناك بعض الخطوات

في خصائص القائمة تبويب بيانات توسع تلقائي = لا

                         تبويب تنسيق عدد الاعمدة = 3 عرض الاعمدة = 0سم;2سم;3سم

 

الان في حدث عند مفتاح اعلى نضع الكود التالي

If Len(co2.Text) > 0 Then
Me.co2.RowSource = " SELECT [id] & "" "" & [item] AS Expr1, tbl_it.id, tbl_it.item, tbl_it.price " & _
" FROM tbl_it " & _
" WHERE ((([id] & "" "" & [item]) Like ""*"" & [Forms]![frm_3]![co2].[Text] & ""*""));"
     Me.co2.Dropdown
     Else
     Me.co2.RowSource = " SELECT [id] & "" "" & [item] AS Expr1, tbl_it.id, tbl_it.item, tbl_it.price " & _
" FROM tbl_it;"
[tx2] = Null: [tx4] = Null
     End If

co2 هي القائمة المنسدلة tx2 و tx4 هي الحقول التي سيتم اضهار الصنفى وسعر الصنف بها

ثم في حدث بعد التحديث للقائمة نضع الامر

Me.tx2 = Me.co2.Column(2)
Me.tx4 = Me.co2.Column(3)

بالتاكيد توجد طرق اكثر ولكن ساكتفي بهذه الطريقة

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

في الصورة المتحركة في المثال ⬇️ يوجد خطا حيث وضعنا اسم الصنف في حقل السعر والسعر في حقل الصنف

لاني عملت المثال وصورتة وانا مشغول بعمل اخر ولم اراجعة

تحياتي

 

تسلم ايدك استاذى الحبيب 

ممكن بعد اذنك رفع المثال 

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

[شامل2]

18 ساعات مضت, abouelhassan said:

تسلم ايدك استاذى الحبيب 

ممكن بعد اذنك رفع المثال 

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

لا زلنا نبحث عن ارفاق المثال؟

[أبوبسمله]

في 15‏/6‏/2022 at 08:16, شامل2 said:

لم اتمكن من تحقيق المطلوب؟

إذا يفضل ارفاق مثالك للتعديل عليه من قبل اخواننا واساتذتنا جزاهم الله عنا كل خير

بالتوفيق

[شامل2]

السلام عليكم

الاخ العزيز الاستاذ خالد مبرمج سابق

ارفق المثال للتطبيق

لم اتمكن من تطبيق ما قمت بنشره

 

مكتب قرطاسية.rar

[أبوبسمله]

السلام عليكم

بعد اذن اخى ومعلمى ووالدى العزيز خالد اتفضل اخى @شامل2 بالرغم من اختلاف الصوره الاولى لك والمثال

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

قمت باضافه حقلين غير منضم تحت الكمبو

بالتوفيق

1_مكتب قرطاسية.rar

[abouelhassan]

تسلم ايدك استاذى احمد الفلاحجي

نحتاج شرح استاذنا لكى نستطيع التنفيذ اخى الكريم

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

[شامل2]

10 ساعات مضت, احمد الفلاحجي said:

السلام عليكم

بعد اذن اخى ومعلمى ووالدى العزيز خالد اتفضل اخى @شامل2 بالرغم من اختلاف الصوره الاولى لك والمثال

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

قمت باضافه حقلين غير منضم تحت الكمبو

بالتوفيق

1_مكتب قرطاسية.rar 42.32 kB · 13 downloads

السلام عليكم

شكرا اخي الكريم

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

وكذلك طريقة البحث اريدها باستخدام احد الخيارات اما بالرمز او باسم المادة

تم تعديل يونيو 21, 2022 بواسطه شامل2

[أبوبسمله]

في 20‏/6‏/2022 at 23:14, abouelhassan said:

نحتاج شرح استاذنا لكى نستطيع التنفيذ اخى الكريم

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

الله يسلمك اخى الكريم وفيك بارك الله

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

في 21‏/6‏/2022 at 06:51, شامل2 said:

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

وكذلك طريقة البحث اريدها باستخدام احد الخيارات اما بالرمز او باسم المادة

اولا الخطأ الموجود بالمرفق ليس له علاقه بالسؤال وموجود فاصل المرفق نفسه

ثانيا انا قمت بتوضيح الطريقه بالنسبه للكمبو الموجود الخاص بالاسم سواء البحث بالرقم او الاسم  فقم انت بعملها لما تريد للبحث عن الاصناف

ارفقت المرفق بعد تعديل طفيف للكمبو بحيث لما تبحث ياتى لك بما بحثت عنه كما كان فقط

بالتوفيق

2_مكتب قرطاسية.rar