بحث في نفس الوقت بحقلين مختلفين

[nokia_c65]

ارجو اضافة زر عند الضغط عليه يظهر مربع حوار للبحث عن اسم الطالب واسم ابيه واسم جده

تجربة.rar

[gadelrab]

الاخ العزيز

nokia_c65

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

المرفق مثال للبحث باى اسم سواء الاسم او اسم الاب او الجد

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

حاولت عمل زر للبحث يقوم بفتح نموذج البحث ولكن لم يعمل

ولخبرتى القليلة لا اعلم السبب

ربما تكون الطريقة التى تعرض بها النموذج الرئيسى هى المانعة لعمل زر البحث

ولكن انظر الى النموذج form

كما حاولت ان اضع لك حدث عند النقر المزدوج على الاسم المختار بعد الفتح

لينقلك اليه مباشرة فى النموذج الرئيسى

ولكنى لم افلح لخبرتى القليلة

وهذا هو كود الحدث عند النقر المزدوج على الاسم فى قائمة البحث لينقلك الى الاسم مباشرة بالنوذج الرئيسى

والذى لم استطع تنفيذه

DoCmd.Minimize

    Dim stDocName As String

    Dim stLinkCriteria As String

    stDocName = "ahdaf"

        stLinkCriteria = "[name]=" & Me![SearchList]

    DoCmd.OpenForm stDocName, , , stLinkCriteria

DoCmd.Close acForm, "form", acSaveYes

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

تجربة1.rar

[nokia_c65]

للرفــــــــــــــــــــــع

[ابوخليل]

السلام عليكم

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

الزر الذي عملته صحيح ونموذج البحث يظهر ولكن خلف النموذج الرئيسي فلا يمكنك رؤيته ولكي تتمكن من رؤيته ويظهر فوق الاطارات الأخرى اذهب إلى خصائص النموذج ومن لسان التبويب : (غير ذلك) واجعل القيمة : منبثق = نعم

وبالنسبة للكود أزلت السطر DoCmd.Minimize لأن نموذج البحث بعد تنفيذ الكود سيغلق

وإن أردت ان تغلقه بنفسك من زر الاغلاق فاحذف السطر الأخير : DoCmd.Close acForm, "form", acSaveYes

واستبدلت الاسم[name] بالرقم التلقائي [n] لأنه فريد

وحيث ان هذا الرقم غير موجود في النموذج الرئيسي فإني اضفته اليه بمربع نص مخفي .

ودمتم سالمين ،،،

تجربة1.rar

تم تعديل يناير 10, 2010 بواسطه أبو الأنس

[gadelrab]

الاستاذ العزيز ابو خليل

جزاك الله خيراً على نبل اخلاقك وتشجيعك الكريم

ملاحظاتك القيمة استفدت منها كثيرا