اختيار الكل من كمبوبوكس و فتح التقريرعلى هذا الخيار للأستاذ جعفر

[عبد الفتاح كيرة]

السلام عليكم

عندنا كمبوبوكس به أسماء

كيف نضيف خيار الكل

و فتح التقرير بهذا الخيار

رد للأستاذ جعفر

هنا

 

[jjafferr]

شكرا أخي عبد الفتاح

 

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

 

جعفر

[عبد الفتاح كيرة]

الان, jjafferr said:

شكرا أخي عبد الفتاح

 

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

 

جعفر

هكذا تعم الفائدة إن شاء الله

جعله الله فى ميزان حسناتك

هناك كنوز من الردود القيمة لأساتذة كبار

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

لو قام المشرفون بهذه المهمة فلهم الشكر

ولو نبدأ من الآن

[محمد سلامة]

44 دقائق مضت, عبد الفتاح كيرة said:

هكذا تعم الفائدة إن شاء الله

جعله الله فى ميزان حسناتك

هناك كنوز من الردود القيمة لأساتذة كبار

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

لو قام المشرفون بهذه المهمة فلهم الشكر

ولو نبدأ من الآن

فعلا والله

هناك ردود في موضوعات اظل ابحث عنها 

وهي مرجع دائم لي.. فعلا كنوز

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

تحياتي استاذي @jjafferr

@عبد الفتاح كيرة

[عبد الفتاح كيرة]

سر على بركة الله

[الحلبي]

اخواني الافاضل

الاستاد / جعفر 

الاستاد / عبد الفتاح

لي وجهة نظر متواضعة في مثال خبيرنا الاستاد / جعفر

انا اعتبر نفسي مبتدأ واروح وين في موسوعة كبيرة مثل اخونا واستادنا / جعفر واستادنا / عبد الفتاح 

لقد استخدمت استعلام واحد فقط واضفت كلمة all  للجدول الموجود

وحصلت علي المطلوب بابسط الطرق . هل انا علي صواب ام انني مخطئ

ارجو من اخواني تصحيح ما قمت به 

 

chang all.rar

[عبد الفتاح كيرة]

والله هذا يكون اكتشافا جديدا

نجرب و نشوف

أى إصدار تستخدم

[عبد الفتاح كيرة]

بارك الله فيك أخانا الحلبى

لكن هذا غير

لاحظ أن سجلا اسمه

all

يظهر فى التقرير

و هذا لايشير لأى دولة

المطلوب 

أن يظهر كل السجلات

all  عند الأستاذ جعفر معناها كل السجلات بالجدول

all عند حضرتك هى اسم إحدى الدول

ليت الحل كان بمثل هذه السهولة

جزاك الله خيرا     

 

مع هذا فهناك حل لإخفاء كلمة all

بتعديل بسيط فى الكود

If Me.z = "all" Then
 DoCmd.OpenReport "rpt_Country", acViewPreview, , "country<>'" & z & "'"
 Else
    DoCmd.OpenReport "rpt_Country", acViewPreview, , "country='" & z & "'"
    
End If

 

تم تعديل مايو 5, 2017 بواسطه عبد الفتاح كيرة

[jjafferr]

السلام عليكم

 

وهذه طريقة اخرى ، بدل ان نستخدم كلمة ALL ، نجعل الحقل فارغ ، وعليه نخبر الاستعلام بإعطاؤنا جميع السجلات:

.

هذا الكود:

IIf(Len([Forms]![frm_Rooms_Available]![Room_Number] & "")=0,[Room_No],[Forms]![frm_Rooms_Available]![Room_Number])

 

وهذه الفقرة من هذه المشاركة:

 

جعفر

[الحلبي]

اخواني لكم كل الاحترام والتقدير

اضافة اخونا الاستاد / عبد الفتاح للكود تمام التمام

كدلك اضافة الاستاد / جعفر تمام التمام

وبهدا نكون وصلنا الي ابسط صورة 

دائما احب ان اداعب الكبار حتي اتعلم واستفيد باكبر قدر

الي الآن اخي جعفر لم اصل الي حل في موضوع سحب اكثر من صورة من الاسكنر

وبصراحة لم اجد ضالتي في الكم الهائل من الامثلة الموجودة

انا عارف ليس المجال الان ان اتكلم فيها ولكن انا في طريقي في معرفة الكثير 

 

[عبد الفتاح كيرة]

كما يمكن وضع نجمة فى صفوف الكمبوبوكس

ونستخدم like  فى الاستعلام

فنجد أنه مع النجمة يعرض كل السجلات

وشكرا لكم على الحوار المفيد جدا

[jjafferr]

منذ ساعه, عبد الفتاح كيرة said:

كما يمكن وضع نجمة فى صفوف الكمبوبوكس

ونستخدم like  فى الاستعلام

فنجد أنه مع النجمة يعرض كل السجلات

نعم هكذا

Like IIf(Len([Forms]![frm_Rooms_Available]![Room_Number] & "")=0,"*", "*" & [Forms]![frm_Rooms_Available]![Room_Number] & "*")

 

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

 

جعفر

[صالح حمادي]

السلام عليكم

حياكم الله أخوتي الكرام

هذه طريقة أخرى أسهل بدون استعمال استعلام و تلبي المطلوب:

If Me.crt = "الكل" Then
   DoCmd.OpenReport "tbl", acViewPreview
Else
   DoCmd.OpenReport "tbl", acViewPreview, , "country = '" & Me.crt & "'"
End If

 

عواصم الدول العربية.rar

تم تعديل مايو 5, 2017 بواسطه صالح حمادي

[عبد الفتاح كيرة]

هذا هو التطبيق باستخدام like

frmmain2

باستخدام like.rar

[الحلبي]

الله عليك اخي الخبير / صالح حمادي 

خبير يضع لمسات خبرته بارك الله فيك

استادنا / عبد الفتاح يعجبني اسلوبك وتفكيرك في حل مشاكل اكسس لا يصدر الا من خبير

معلمنا / جعفر هكدا مداعبة الخبراء تأتي بالثمار

الله يفتح عليكم ويبارك في علمكم 

[صالح حمادي]

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

الله يفتح عليكم ويبارك في علمكم 

آمييييييييييين يا رب العالمييييييييين و لك بالمثل

[jjafferr]

انا جمعت الطرق الثلاث مع بعض ، وبدون وجود سجل فاضي في جدول الدول

 

.

جعفر

 

 

638.1.All.accdb.zip

[الحلبي]

الله ياعبقري مثل ما تعودنا 

باشا والله باشا 

[عيسى الحوراني]

اسعدالله صباحكم اخواني الاعزاء وزادكم الله علما

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

[عبد الفتاح كيرة]

في ٥‏/٥‏/٢٠١٧ at 18:43, jjafferr said:

انا جمعت الطرق الثلاث مع بعض ، وبدون وجود سجل فاضي في جدول الدول

ونعم الجمع جمعك

الآن اكتمل الملف

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

[jjafferr]

تم فصل موضوع الاخ @حمادة عثمان الى موضوع مستقل:

 

جعفر