اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

هل يوجد كود او ماكرو لعدم فتح البرنامج اكثر من مره ؟

فعند فتح البرنامج مره اخري فى حالة تشغيلة بالفعل لا يسمح ويقوم بغلق القاعدة الجديدة ؟

قام بنشر

تفضل أخي @king5star 

في ٥‏/٦‏/٢٠١٨ at 20:23, kanory said:

أخي @حسين العربى استخدم هذا الكود في حدت عند تحميل النموذج 


If GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2").ExecQuery("SELECT * FROM Win32_Process where Name ='msaccess.exe'").Count > 1 Then MsgBox ("i can work alone"): DoCmd.Quit acQuitSaveAll

 

 

  • Thanks 2

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • اضف...

Important Information