فتح أداة البحث بحالة التطابق والإتجاه الإفتراضيين باستخدام أمر SendKeys

[Accessna]

أحيانا يرغب أحدنا بالبحث بطريقة معينة نتيجة نوع البيانات أو طريقة تعود المستخدم .

وأداة البحث تحتوي على ثلاثة حالات للتطابق وهي:

1 - البحث بكامل النص (الإفتراضي) .

2 - البحث بأي جزء من النص .

3 - البحث ببداية النص .

وتحتوي على ثلاثة اتجاهات للبحث كذلك وهي :

1 - كامل السجلات من بدايتها وحتى النهاية (الإفتراضي) .

2 - إلى الأعلى أي من موقع السجل الحالي إلى أول سجل .

3 - إلى الأسفل أي من موقع السجل الحالي إلى آخر سجل .

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

مشكلة الأداة أنها دائما ما تفتح على الإفتراضيات وهي البحث بكامل النص وباتجاه كامل السجلات وسنضطر إلى تبديلهما "عنوة" يدويا في كل مرة نطلب فيها البحث !!.

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

FindMatchCases.zip

تم تعديل فبراير 16, 2010 بواسطه Accessna

[رياض الراوي]

أشكرك اخي Accessna على هذ المثال المفيد والشامل.

ولكن عند تجربة زر Whole Field - All لم يعمل إلا بعد تعديل بسيط وهو حذف السطر

'DoCmd.FindRecord

فاقتضى التنويه. وفقك الله للمزيد من مرضاته

[Accessna]

شكرا لك أخي رياض الراوي على المرور وتنزيل المثال والتنويه .

وشكرا للجميع على كرمهم بالمرور والدعم .

[منتصر الانسي]

مثال ممتاز وفكرة جميلة تجعلنا نعيد التفكير في كثير من المشاكل التي يمكن حلها بالأمر SendKeys فشكراً جزيلاً لك

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

مع تحياتي,,,