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

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


king5star

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

تفضل أخي @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
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
×
×
  • اضف...

Important Information