حياكم الله اخواني
اضفت accdr للفلتر في المرفق الذي ارفقته الذي يمكن ويعطل الشفت من خارج البرنامج
strFilter = ahtAddFilterItem(strFilter, "Access Files (*.mde, *.mdb, *.accdb, *.accde,*.accdr)", "*.MDE;*.MDB;*.ACCDB;*.ACCDE;.ACCDR*")
البرنامج في المرفق كان يكتشف كل الامتدادات ما عدا accdr.
نقول ان شاء الله ان معنى هذا انه اسلوب حماية جيد ..
بالتوفيق للجميع