أخي الكريم لتخفيض أمان الأكسس برمجيا لجميع نسخ الأكسس ضع في حدث عند التحميل للنموذج الذي تفتح عليه قاعدة البيانات الكود التالي Private Sub Form_Load() If CreateObject("WScript.Shell").RegRead("HKEY_CURRENT_USER\Software\Microsoft\Office\" & Application.Version & "\Access\Security\" & IIf(Application.Version < 12, "Level", "VBAWarnings")) <> "1" Then CreateObject("WScript.Shell").RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Office\" & Application.Version &
    • Like
    1