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

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

قام بنشر

بسم الله الرحمن الرحيم

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

أيها الأحبة منذ أن بدأت في تعلم الأكسس حيث كانت بداياتي في هذا المنتدى المبارك وكنت أتمنى طريقة شرح معينة حيث إن المبتدئ منا لا يحتاج للشيء النظري البحث إنما يحتاج لإنارة الطريق حتى يصل إلى المطلوب من خلال أمثلة مبسطة وذلك بحكم أن ليس كل مشارك في المنتدى متخصص في البرمجة ونحوها ..

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

ومن هذا أحببت أن نبدأ جميعًا في مشروع أظنه نافعا بإذن الله تعالى وما كان لي أن أطرحه دون إذن أساتذتي الفضلاء الذي لهم سبق فضل علي بعد فضل الله بارك الله في علمهم وعملهم ...

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

وعلى ذلك أستأذنكم في طرح مثال أُسرُّ من خلال برأيكم وملحوظاتكم حيث إني لم أقف في شبكة الإنترنت على من تولى مثل ذلك وأتمنى أن يكون لهذا المنتدى قصب السبق ...

عنوان الموضوع طرائق البحث في الأكسس :

الطريقة الأولى :

البحث في النموذج بكتابة جز من الكلمة

نفرض أن لدينا جدولا اسمه Book يهتم بأسماء الكتب ونرغب أن نبحث عن كتاب معين بمجرد كتابة جزء من اسمه فنعمل الآتي:

1)نصمم جدولا باسم Book بداخله أسماء كتب تحت سجل nameBook

2) نصمم نموذجا مبني على جدول Book بنماذج مستمرة وليكن اسم النموذج FormBook.

3) ندرج في أعلى النموذج (رأس النموذج ) مربع نص ونسميه فرضا Text1 وبالطبع التسمية من خلال الضغط على مربع التسمية بالزر الأيمن ثم خصائص ثم غير ذلك ثم في خانة الاسم نكتب الاسم المطلوب.

4) نقوم بعمل استعلام مبني على جدول Book وليكن اسمه Qry في الاستعلام نجد سجل NameBook نكتب في الحقل الفارغ الذي بجواره الكود التالي :


nz([book].[namebook];"**")

حيث إن Book اسم الجدول و NameBook اسم السجل الذي بداخل الجدول. 5) في الاستعلام في المعايير تحت حقل الذي تم عمله في الفقرة رقم (4) نضع الكود التالي

Like "*" & [forms]![formbook]![text1] & "*"

حيث FormBook هو اسم النموذج و Text1 اسم مربع النص الذي تم إدراجه في رأس النموذج. 6) نذهب إلى النموذج ونضع المؤشر على مربع النص text1 ثم الزر الأيمن ثم خصائص ثم حدث ثم بعد التحديث نضع الأمر التالي

Me.Requery

7) نذهب إلى خصائص النموذج من خلال الضغط على أي مكان فارغ في النموذج ثم الزر الأيمن ثم خصائص ثم نختار بيانات ثم مصدر السجل ثم نختار منه اسم الاستعلام Qry

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

وبالمثال يتضح المقال.

((هذا نموذج إن كان مناسبا نستمر عليه ليكون مرجعا ثم ننتقل إلى موضوع آخر (ولا ولا ولا أستغني عن الرأي والمشووورة وهذا جهد المقل) ...)

والله الموفق

طرائق البحث.rar

  • Like 13
قام بنشر

بسم الله ما شاء الله اخي حامل المسك

انت حامل المسكين

مسك الافكار و مسك الإبداع

ما الفائدة من الحقل nz([book].[namebook];"**"]

و احببت ان الفت نظرك الى الحقل namebook في النموذج

لماذا لم تقفله منعا لاي تعديل !!

ووفقك الله الى ما يحبه و يرضاه

  • Like 4
قام بنشر

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

لا أخفيك سرا أني كثيرا من الأكواد لا أفهمه ولكن استقصاء من الأمثلة ثم تطبيق ...

بالنسبة للكود الذي ذكرته فيما يظهر أنه للبحث في جدول Book في سجل nameBook وNz لتلافي القيم الخالية ...

بالنسبة لإقفال النموذج من عدمه فهذا لا يهم في المثال أهم شئ آلية البحث

والله يرعاك

قام بنشر

بارك الله لكم وبكم

سنشارك ونساهم ما قدّر لنا

آملاً من الاخوة بذل المجهود للوصول للمقصود

والله المستعان ...

قام بنشر

طريقة ثانية :

البحث في النموذج الفرعي

نفرض أن لدينا مكتبة في جدول باسم Book تحوي اسم الكتاب والمؤلف والناشر وتاريخ النشر

ونرغب في عمل مربع بحث مشترك بحيث عند الكتابة فيه يبحث في أي خانة مباشرة سواء كان اسم الكتاب أو المؤلف أو الناشر ...

فالعمل على النحو التالي :

1) ننشئ جدولا باسم Book ونضمنه الحقول المطلوبة من اسم الكتاب والمؤلف والناشر ... إلخ.

2)ننشئ نموذجا مرتبطًا بالجدول (نماذج مستمرة) ونسميه FoBook.

3) ننشئ نموذجا آخر من جديد ثم طريقة عرض التصميم .

4) في رأس النموذج نضع مربعي نص الأول نسميه Text1 والآخر text2

5) في مربع النص text1 من الخصائص حدث عند التغيير نضع الكود التالي


Dim x

x = Text1.Text

text2 = x

Me.FoBook.Requery

حيث text1 اسم مربع النص الأول و text2 اسم مربع النص الثاني وFobook هو اسم النموذج الذي تم عمله كما في الفقرة 2. 6) من خصائص مربع النص text2 تنسيق مرئي (لا). 7) في خانة التفصيل من هذا النموذج ندرج نموذج فرعي ونختار استخدام نموذج موجود ثم نختار نموذج FoBook. 8) نغلق النموذج ونقوم بحفظه باسم FoormBook 9) نعود للنموذج FoBook (الذي تم عمله في الفقرة 2) ومن خصائص النموذج بيانات مصدر السجل ثم نضغط على النقاط الثلاث ثم يطلب هل تريد عمل استعلام ثم موافق يفتح لك استعلام أدرج فيه حقول الجدول كافة. 10) وفي هذا الاستعلام ضع الكود التالي تحت كل حقل تريد البحث فيه في خانة معيار مع ملاحظة تدرجة في كل مرة في أو كما في المثال ثم اغلق واحفظ عملك

Like "*" & [Forms]![Foormbook]![Text2] & "*"

11) ارجع إلى النموذج FoormBook واكتب في مربع النص الظاهر أمامك وتجد آليه البحث قد عملت..

أ

والله الموفق

طريقة البحث في النموذج الفرعي.rar

  • Like 5
  • 2 months later...
  • 2 weeks later...
قام بنشر

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

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

سبحان الله ... الحاجات لا تنتهي والاهداف تختلف .... تتقاطع وتتباعد

ولكل منا مذهب وطريق

أنا شخصياً افضل وجود تطبيق مستقل مرتبط مع قاعدة البيانات ، يمثل محركا للبحث يحلل ويشّرِح كافة حاجات البحث والتصفية لقاعدة البيانات ... !!!

............

  • Like 3
  • 4 weeks later...
  • 4 weeks later...
  • 3 months later...
  • 4 weeks later...
قام بنشر

بارك الله فيك

أبداع ما شاء الله عليك

عندي سؤال

اريد عدد الصفحات في الأسفل عن نتائج أكثر من عشرة مثلا في الصفحة الواحدة

 

وشكرا

  • Like 1
قام بنشر

حياكم الله . كت ارغب تعلم هذه الطرق منذ فترة طولية 

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

اكرر شكري وتقديري للجميع 

  • Like 1
قام بنشر (معدل)

السلام عليكم .

اولا : اسف ان لم اوفق في طلبي . سوف  احاول ان اوضح 

لنفرض نحن  نريد جميع الكتب لنفس المؤلف وفي نفس الوقت لنفس دار النشر 

اي ندخل في text1   اسم المؤلف وفي  text2  ندخل دار النشر . اي تحقق شرط (and) 

ومن الممكن زيادة عدد  texts  حسب عدد الاعمدة التي من الممكن ان تدخل  في شرط البحث من خلالها . مع امكانية ان يكون احدى الحقول لاتحتوي على قيم . 

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

اتمنى انني وفقت في طرح الموضوع . 

تم تعديل بواسطه صباح حسين
  • Like 1
  • 8 months later...
  • 3 months later...
  • 1 month later...
قام بنشر (معدل)

ما شاء الله على هذه الجهود الجميلة والفعالة والمفيدة جدا ...

.. ماذا لو كان اسم الكتاب مثلا مؤلف من اربع كلمات وانا اذكر الاولى والاخيرة واريد البحث عنه

تم تعديل بواسطه maher13

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