يمكنك استخدام الإجراء ApplyFilter لتطبيق عامل تصفية أو استعلام أو عبارة SQL WHERE على جدول أو نموذج أو تقرير لتقييد السجلات أو فرزها في الجدول أو السجلات من الجدول أو الاستعلام الأساسي للنموذج أو التقرير. بالنسبة للتقارير، يمكنك استخدام هذا الإجراء فقط في الماكرو المحددة بواسطة خاصية الحدث OnOpen للتقرير.
ملاحظة: يمكنك استخدام هذا الإجراء لتطبيق عبارة SQL WHERE فقط عند تطبيق عامل تصفية خادم. لا يمكن تطبيق عامل تصفية الخادم على مصدر سجل الإجراء المخزن.
ملاحظة: لا يتوفر إجراء الماكرو ApplyFilter في تطبيقات Access على الويب.
الإعداد
يحتوي الإجراء ApplyFilter على الوسيطات التالية.
|
وسيطة الإجراء |
الوصف |
|
اسم عامل التصفية |
اسم عامل تصفية أو استعلام يقيد سجلات الجدول أو النموذج أو التقرير أو يفرزها. يمكنك إدخال اسم استعلام موجود أو عامل تصفية تم حفظه كاستعلام في المربع اسم عامل التصفية في قسم وسيطات الإجراء في جزء منشئ الماكرو. ملاحظة: عند استخدام هذا الإجراء لتطبيق عامل تصفية خادم، يجب أن تكون وسيطة اسم عامل التصفية فارغة. |
|
حيث الشرط |
عبارة SQL WHERE صالحة (بدون كلمة WHERE) أو تعبير تقيد سجلات الجدول أو النموذج أو التقرير. ملاحظة: في تعبير وسيطة Where Condition ، يحتوي الجانب الأيسر من التعبير عادة على اسم حقل من الجدول أو الاستعلام الأساسي للنموذج أو التقرير. يحتوي الجانب الأيمن من التعبير عادة على معايير التي تريد تطبيقها على هذا الحقل لتقييد السجلات أو فرزها. على سبيل المثال، يمكن أن تكون المعايير اسم عنصر تحكم في نموذج آخر يحتوي على القيمة التي تريد أن تتطابق السجلات الموجودة في النموذج الأول. يجب أن يكون اسم عنصر التحكم مؤهلا بالكامل، على سبيل المثال: النماذج! اسم النموذج! اسم عنصر التحكم يجب أن تكون أسماء الحقول محاطة بعلامات اقتباس مزدوجة ويجب أن تكون القيم الحرفية للسلسلة محاطة بعلامات اقتباس مفردة. الحد الأقصى لطول الوسيطة Where Condition هو 255 حرفا. إذا كنت بحاجة إلى إدخال عبارة SQL WHERE أطول، فاستخدم أسلوب ApplyFilter لكائن DoCmd في وحدة Visual Basic for Applications (VBA). يمكنك إدخال عبارات عبارة SQL WHERE التي تصل إلى 32768 حرفا في VBA. |
ملاحظة: يمكنك استخدام وسيطة اسم عامل التصفية إذا قمت بالفعل بتعريف عامل تصفية يوفر البيانات المناسبة. يمكنك استخدام الوسيطة Where Condition لإدخال معايير التقييد مباشرة. إذا كنت تستخدم الوسيطتين، Access يطبق عبارة WHERE على نتائج عامل التصفية. يجب استخدام وسيطة واحدة أو كلتيهما.
ملاحظات
يمكنك تطبيق عامل تصفية أو استعلام على نموذج في عرض النموذج أو طريقة عرض ورقة البيانات.
يصبح عامل التصفية وحالة WHERE التي تطبقها إعداد الخاصية Filter أو ServerFilter الخاصة بالنموذج أو التقرير.
بالنسبة للجداول والنماذج، يشبه هذا الإجراء النقر فوق تطبيق عامل التصفية/الفرز أو تطبيق عامل تصفية الخادم في قائمة السجلات . يطبق أمر القائمة عامل التصفية الذي تم إنشاؤه مؤخرا على الجدول أو النموذج، بينما يطبق إجراء ApplyFilter عامل تصفية أو استعلام محدد.
في قاعدة بيانات Access، إذا أشرت إلى تصفية في القائمة سجلات ثم انقر فوق تصفية/فرز متقدم بعد تشغيل إجراء ApplyFilter ، تعرض نافذة تصفية/فرز متقدم معايير التصفية التي حددتها باستخدام هذا الإجراء.
لإزالة عامل تصفية وعرض كافة السجلات لجدول أو نموذج في قاعدة بيانات Access ، يمكنك استخدام الإجراء ShowAllRecords أو الأمر إزالة عامل التصفية/الفرز في القائمة سجلات . لإزالة عامل تصفية في مشروع Access (.adp)، يمكنك العودة إلى نافذة تصفية الخادم حسب النموذج وإزالة جميع معايير التصفية ثم النقر فوق تطبيق عامل تصفية الخادم على القائمة سجلات على شريط الأدوات، أو تعيين الخاصية ServerFilterByForm إلى False (0).
عند حفظ جدول أو نموذج، يحفظ Access أي عامل تصفية معرف حاليا في هذا الكائن، ولكنه لن يطبق عامل التصفية تلقائيا في المرة التالية التي يتم فيها فتح الكائن (على الرغم من أنه سيطبق تلقائيا أي فرز قمت بتطبيقه على العنصر قبل حفظه). إذا كنت تريد تطبيق عامل تصفية تلقائيا عند فتح نموذج لأول مرة، فحدد ماكرو يحتوي على إجراء ApplyFilter أو إجراء حدث يحتوي على أسلوب ApplyFilter لكائن DoCmd كإعداد خاصية الحدث OnOpen للنموذج. يمكنك أيضا تطبيق عامل تصفية باستخدام الإجراء OpenForm أو OpenReport أو الطرق المقابلة لها. لتطبيق عامل تصفية تلقائيا عند فتح جدول لأول مرة، يمكنك فتح الجدول باستخدام ماكرو يحتوي على إجراء OpenTable ، متبوعا مباشرة بإجراء ApplyFilter .
مثال
تطبيق عامل تصفية باستخدام ماكرو
يحتوي الماكرو التالي على مجموعة من الإجراءات، يقوم كل منها بتصفية السجلات لنموذج قائمة هواتف العملاء. يظهر استخدام إجراءات ApplyFilter و ShowAllRecords و GoToControl . كما يعرض استخدام الشروط لتحديد زر التبديل الذي تم تحديده في مجموعة خيارات في النموذج. يقترن كل صف إجراء بزر تبديل يحدد مجموعة السجلات التي تبدأ ب A أو B أو C وما إلى ذلك أو جميع السجلات. يجب إرفاق هذا الماكرو بالحدث AfterUpdate لمجموعة خيارات CompanyNameFilter.
|
الشرط |
الإجراء |
الوسيطات: إعداد |
تعليق |
|
[CompanyNameFilters]=1 |
Applyfilter |
Where Condition: [CompanyName] Like "[AÀÁÂÃÄ]*" |
تصفية أسماء الشركات التي تبدأ ب A أو À أو Á أو Â أو Ã أو Ä. |
|
[CompanyNameFilters]=2 |
Applyfilter |
Where Condition: [CompanyName] Like "B*" |
تصفية أسماء الشركات التي تبدأ ب B. |
|
[CompanyNameFilters]=3 |
Applyfilter |
Where Condition: [CompanyName] Like "[CÇ]*" |
تصفية لأسماء الشركات التي تبدأ ب C أو Ç. |
|
... صفوف الإجراءات ل D إلى Y لها نفس تنسيق A إلى C ... |
|||
|
[CompanyNameFilters]=26 |
Applyfilter |
Where Condition: [CompanyName] Like "[Z اليوم]*" |
تصفية أسماء الشركات التي تبدأ ب Z أو Ø أو Å. |
|
[CompanyNameFilters]=27 |
ShowAllRecords |
إظهار كافة السجلات. |
|
|
[RecordsetClone]. [RecordCount]>0 |
Gotocontrol |
Control Name: CompanyName |
إذا تم إرجاع السجلات للحرف المحدد، فانقل التركيز إلى عنصر تحكم CompanyName. |
