تصفية بيانات حقول في ازرار متعددة

[غريب طرابلس]

السلام عليكم ورحمــــة الله تعالى وبركاته

 

 المطلـــوب  هو تصفية  بيانات السجلات داخل الازرار          

                         بمعنى  ( كل  زر ياخد بيانات سجل )                              

      انا استخدمت هده الطريقة لكن لا اجدها عملية         

               ان كانت فيه طريقة اخرى فالمرجوا افادتي بها  ومشكورين سلفا                      

                                ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ     

  me.a.caption  = me.Iname

DoCmd.GoToRecord , , acNext

    me.b.caption  = me.Iname  

      DoCmd.GoToRecord , , acNext   

  me.c.caption  = me.Iname    

  me.d.caption  = me.Iname  

 

فهده طريقة بسيطة بدون تعقيد

لكن لا تخدم ما اريده  لانه عدد الازرار يفوق 50 زر

فالمثال يوضح الطلب  

وشكرا  مسبقا

             

تصفية بيانات سجل.rar

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

وعليكم السلام ورحمة الله وبركاته
يمكن الاستفادة من دالة DLookUp كالتالي

Me.a.Caption = DLookup("Iname", "Tb1", "[Id]=1 ")
Me.b.Caption = DLookup("Iname", "Tb1", "[Id]=2 ")
Me.c.Caption = DLookup("Iname", "Tb1", "[Id]=3 ")

تحياتي

تصفية بيانات سجل.rar

[غريب طرابلس]

السلام عليكم

 

شكرا لك اخ ابو عبد الله

الطريقة هده اعرفها  ولا تخدم ما انا اريده

ساشرح لك  :ممكن اني لم اطرح السؤال بطريقة مفهومة

النمودج الفرعي مبني على جدول  اما دالة DLookup  فهي طريقة تابتة لجلب بيانات حقول

فالازرار كما رايت تاخد بيانات من الجدول لان الجدول موجود وهو مبني عليه النمودج الفرعي 

فلمادا استخدم دالة  DLookup

 

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

ان كانت فيه وحدة نمطية توفي بالغرظ فانا اكون ممنون وشاكر

[Shivan Rekany]

هناك سؤالين
ما هو السبب ان تستخدم الازرار لتصفية السجلات ؟ هل كومبوبوكس واحد ما يوصلك الى حاجتك ؟

[غريب طرابلس]

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

 

ردا اخي الكريم على سؤالك

النمودج الفرعي  توجد فيه ازرار كثيرة

وكدلك النمودج مبني على جدول وفيه حقل  (id)  وحقل (Iname)

وانت سيدي الفاضل وكونك خبير  تعلم   دالة DLookup وما عملها 

يعني بعيدة جدا عن ما اريد

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

هو مثل طريقة لي استخدمتها  لكن ان تكون على يد متمكن يعني خبير 

اما انا جزاك الله عني كل الخير هاوي فقط

يا اخي ممكن لم اقم بشرح الموظوع بطريقة صحيحة

فالخطا مني اعتدر

فما اريده هو ان نمودج رئيسي سيكون به نمودج فرعي اخر  ( للمجموعات)

ونمودج الدي به الازرار سيكون للاصناف 

فعند اختيار المجموعة تظهر الاصناف متسلسلة داخل  الازرار

فانا يا  استادي توصلت للحل بطريقة التي ارسلتها في المرفق

لم تعجبني طريقتي في عملها فوجدتها غير عملية لان عدد الازرار تقريبا 40

فالدي اصبوا اليه هو توزيع سجلات داخل الازرار

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

وان اتعلم من الخبراء

وشكرا مقدما

 

_____________________________________________________________

[يوسف أحمد]

السلام عليكم

 

بعد اذن اخواني الكرام

 

عندي حل و لكن يعتمد على تسمية الازرار حسب تسلسل حقل id    ارجو ان يفي بالغرض

 

On Error Resume Next
Dim cnt As Object

For Each cnt In Me.Controls
    If cnt.ControlType = acCommandButton Then
        cnt.Caption = DLookup("iname", "tb1", "id = " & cnt.Name)
    End If
Next

 

بالتوفيق للجميع

تصفية بيانات سجل.rar

[غريب طرابلس]

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

 

ردا اخي الكريم على سؤالك

النمودج الفرعي  توجد فيه ازرار كثيرة

وكدلك النمودج مبني على جدول وفيه حقل  (id)  وحقل (Iname)

وانت سيدي الفاضل وكونك خبير  تعلم   دالة DLookup وما عملها 

يعني بعيدة جدا عن ما اريد

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

هو مثل طريقة لي استخدمتها  لكن ان تكون على يد متمكن يعني خبير 

اما انا جزاك الله عني كل الخير هاوي فقط

يا اخي ممكن لم اقم بشرح الموظوع بطريقة صحيحة

فالخطا مني اعتدر

فما اريده هو ان نمودج رئيسي سيكون به نمودج فرعي اخر  ( للمجموعات)

ونمودج الدي به الازرار سيكون للاصناف 

فعند اختيار المجموعة تظهر الاصناف متسلسلة داخل  الازرار

فانا يا  استادي توصلت للحل بطريقة التي ارسلتها في المرفق

لم تعجبني طريقتي في عملها فوجدتها غير عملية لان عدد الازرار تقريبا 40

فالدي اصبوا اليه هو توزيع سجلات داخل الازرار

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

وان اتعلم من الخبراء

وشكرا مقدما

ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

السلام عليكـــــم ورحمــة الله تعالــــى وبركاتــــــه

 

شكرا  اخي  الكريم على الرد

فما  قمت  به  ففعلا  خبرة  

فهو قريبا  جدا مما اريد 

الدالة هده لجلب  جدول  جميل جدا  

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

لان المثل الدي ارسلته مبني على جدول 

اما الدي اريده فهو نمود الفرعي مبني على اسنعلام 

فاكيد اني لم اوضح ما كنت اريده  

عدرا على خطئي

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

[يوسف أحمد]

استبدل اسم الجدول بإسم الاستعلام في الكود .

 

او ضع مثال حقيقي لما تريد .

تم تعديل مايو 8, 2017 بواسطه يوسف أحمد

[رمهان]

هذا رابط اعتقد قريب لما تريد

بالتوفيق

[غريب طرابلس]

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

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

وشكرا 

[غريب طرابلس]

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

اليك اخي رمهان  المثال 

انظر  للمثال وستعرف ما اريد

 

 

Text2.rar

[رمهان]

اخي غريب

صدقني الرابط السابق به مشاركة لما تريد بالتمام ونفس طلبك

وعالعموم ساحاول اعادة التطبيق

الان استفسار : ماذا تقصد بتصفية ؟ هل يتم اخفاء باقي الازرار ام يتركها وبعنوان فارغ ؟

[غريب طرابلس]

الله يبارك فيك على اهتمامك بالموضوع  اضن انك شفت المثال

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

ما  اريده  وهو واضح  اخي  الكريم

هو المجموعة لها نفس  الرقم مع  الاصناف 

فعند ظغط على اسم المجموعة  مثلا (عصائر )

اريد نمودج الاصناف تظهر فيه سوى الاصناف  ( عصائر) وليس كل الاصناف

ليسو جدولين مرتبطين وانما  لهم رقم  متطابق

فيه فورم  لاضافة الاصناف انظر  اليه وستعرف  ما اريد

[wael_rafat]

السلام عليكم

بالاضافة الى توجيه استاذنا الغالي رمهاان بارك الله فيه وبتوجيهاته ورؤيته .

اخي غريب انا للاسف لم اطلع علي المرفق لكوني اشارك من الموبايل

17 دقائق مضت, غريب طرابلس said:

ما  اريده  وهو واضح  اخي  الكريم

هو المجموعة لها نفس  الرقم مع  الاصناف 

فعند ظغط على اسم المجموعة  مثلا (عصائر )

  ومن كلامك فهمت ان الامر عبارة عن تكويد وتنظيم الاصناف في البداية بمعنى

* مجموعة اللحوم  كودها 1 وتضم

1001 دجاح

1002 لحم

1003 سمك

* مجموعة المشروبات والعصائر  كودها 2 وتضم

2001 مياه

2002 عصير مانجو

2003 عصير فراولة

وهكذا ......

هل لاحظت ان كود الصنف مرتبط بكود المجموعة ..

وعلية يوجد ربط بين كل مجموعة واصنافها ومن ثم عند الضغط علي مجموعة اللحوم سوف تظهر اصناف اللحوم فقط وعند الضغط علي مجموعة المشروبات سوف تظهر اصناف المشروبات فقط ...... الخ

اتمني يكون كلامي واضح ووصلت الرسالة..

بالتوفيق

تم تعديل مايو 9, 2017 بواسطه wael_rafat

[غريب طرابلس]

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

اخي ما اريده تصفية فقط

اما المجموعة و الاصناف لها نفس الرقم

اريد تصفية حقل من المجموعة   مثلا(عصائر)_(ماكولات)_(مشرويات)

عصائر = تصفية لنمودج فرعي للاصناف - خوخ|تفاح|برتقال

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

وهكدا 

اما ردك بعيدا  عن  السؤال

 

وشكرا

[wael_rafat]

4 دقائق مضت, غريب طرابلس said:

اما ردك بعيدا  عن  السؤال

 

بعتذر اخي الكريم 

دعني اطلع علي المرفق اولا ...

[غريب طرابلس]

اخي  الكريم لم  تفهم  ما  اريده

ما قمت بشرح ليس هو ما اريد 

لاني عملت ربط بين المجموعة والاصناف

هدا موضوع  لا ابحث  فيه

________________________________

ما اريده

انا اتكلم عن نمودج فاتورة

اريد عند اختيار نوع المجموعة  يثم تصفية الصنف على حسب اسم المجموعة

يعني   عصائر  ____ عنب _ خوخ_ تفاح

 

[رمهان]

اخي غريب

سؤالي كان واضح واحتاج اجابتك : انا فهمت ماتريد وبقي الاستفسار : بالنموذج الفرعي انت واضع 56 زر . فمثلا لو العصائر 3 هل يتم اخفاء ال 53 زر الباقين ام يتركهم وبدون عنوان او تسميه للاصناف؟

[غريب طرابلس]

ليس مشكلا اخفاء الازرار الفارغة 

وان كان ممكن فافضل

 

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

دون ظهور  الازرار الاخرى

 

[رمهان]

1 دقيقه مضت, غريب طرابلس said:

ليس مشكلا اخفاء الازرار الفارغة 

وان كان ممكن فافضل

 

تمام .. قيد التنفيذ

[رمهان]

جرب

 

Text2.rar

[غريب طرابلس]

اول ما  فتحت المثال 

والله الواحد يعجز عن شكرك  فالشكر  قليل في حقك

الله  يبارك فيك دنيا واخرة

الله يبيض وجهك  يا  اخي

هاد هو  المطلوب

ممكن  في البداية لم اوضح المطلوب

 

شكرا يا اخ رمهان وجعله الله في ميزان حسناتك

معليش اخ رمهان فيه مشكل  بسيط

هو عند تتغيير المجموعة

تبقى الاصناف المجموعة الاخرى لا تختفي 

هل فيه حل 

وشكرا

[رمهان]

اخي غريب 

العفو اولا 

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

1. كيف ستتعرف على اكواد العناصر حتى يتم الخصم من الجداول

2. كيف تسجيل حركة البع 

3. كيف وكيف

 

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

بالتوفيق

[غريب طرابلس]

شكرا اخي على الرد السؤيع

بنسبة للبرنامج  كل امور الاخرى الحمد لله 

كانت المشكلة في اضافة الاصناف في  الازرار وليس في الحقول 

نظام  POS

عامل  برامج  اخرى والحمد لله

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

مثلك اخي  الكريم  فاسمك  ماشاء  الله وفيه كدلك ابو خليل  الله يبارك والاخ جعفر   بسم الله ما شاء الله معروفين على الصعيد الوطن  العربي  

فانا  اتابع هاد المنتدى من مدة طويلة 

 

 

[رمهان]

هذه فكرة 

لابد من سرد جميع اسماء زر الامر في جدول table1

بالتوفيق

Text2.rar