أحتاج ترجمة هذا الاستعلام مشكورين

مرحبا إخواني

كيف أجعل ترجمة هذا الاستعلام
إما أن يجلب لي ما في التيكس
وإذا كان التيكس فارغ فيجلب لي الكل

تماما مثل عملية الفلترة


Rs.Open "select * from ACCUEILLE where (col1 = '" & Trim(text1) & "' or col1 is not null)", DB, adOpenStatic, adLockPessimistic



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