حل مشكلة رسالة خطأ_ error 7 out of memory

[Mrtaha]

هذا الكود في صلاحيات المستخدمين علما انو الكود كان شغال فجأ بدا يجيب رسالة خطأ هذه  ,, ما العمل

 

هذا هو الكود

            ElseIf UserLevel = "Editor" Then
                   DoCmd.Close
                   DoCmd.OpenForm "main"
                   Form_main.NavigationButton94.Enabled = False

[النجاشي]

1 ساعه مضت, Mrtaha said:

هذا الكود في صلاحيات المستخدمين علما انو الكود كان شغال فجأ بدا يجيب رسالة خطأ هذه  ,, ما العمل

 

هذا هو الكود

            ElseIf UserLevel = "Editor" Then
                   DoCmd.Close
                   DoCmd.OpenForm "main"
                   Form_main.NavigationButton94.Enabled = False

وعليكم السلام

استخدم  هذا السطر  باعلا كودك

On Error Resume Next

[احمد سودا]

27 دقائق مضت, ابو زاهر said:

وعليكم السلام

استخدم  هذا السطر  باعلا كودك

On Error Resume Next 

On Error Resume Next

هذا السطر يمنع رسالة الحطأ لكن لا ينفذ الكود

   Form_main.NavigationButton94.Enabled = False

تم تعديل سبتمبر 18, 2018 بواسطه احمد سودا

[ابو ياسين المشولي]

من خلال الصورة انه في خطا في الاسم

form

 فهو

 forms! main

ولو ترفق مثال مصغر يكون افضل

[Shivan Rekany]

في ١٨‏/٩‏/٢٠١٨ at 18:40, ابو ياسين المشولي said:

forms! main

دائما انا استخدم هذه الطريقة Form_FormName
بدل هذه الطريقة Forms!FormName

لكن هناك شرط في طريقة اللي استخدمه وهو يجب ان يكون محرر فيجوال للفورم مفتوحة