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

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

قام بنشر

السلام عليكم 

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

اريد ارسال قاعدة البيانات لشخص  ما من اجل تجريبها وسيتم ايقافها عن العمل بعد 5 ايام

المشكلة التي واجهتني انه تمكين المحتوى يجعل الشخص يدخل على كافة البيانات ويلغي احتياطات الامان التي قمت بها

المطلوب :: اريد كود عند فتح قاعدة البيانات يقوم الكود تلقائيا بتفعيل تمكين المحتوى ولا يستطيع المستخدم وقتها الوصول الى معلومات القاعدة 

 

هل ذلك ممكن ؟؟

666.jpg

777.jpg

قام بنشر

اذا لا يتوفر كود 

هناك حل بديل وهو (Teamviewer

حيث ندخل على كمبيوتر الشخص المعني ونشغل البرنامج ونكبس على تمكين المحتوى

لكن اذا وجدت كود برمجي يكو ن افضل لانه معظم الناس ما عندها Teamviewer

قام بنشر

وعليكم السلام ورحمة الله وبركاته

تفضل اخي الكريم

هذه مجموعة من ملفات ريجستري لتخفيض الأمان حسب نسخة الاوفيس للأخت الفاضلة زهرة

zaSecurityLowLevel2003.rar

zaSecurityLowLevel2007.rar

zaSecurityLowLevel2010.rar

zaSecurityLowLevel2013.rar

تحياتي

  • Like 1
  • Thanks 1
قام بنشر
4 ساعات مضت, محمد ابوعبد الله said:

وعليكم السلام ورحمة الله وبركاته

تفضل اخي الكريم

هذه مجموعة من ملفات ريجستري لتخفيض الأمان حسب نسخة الاوفيس للأخت الفاضلة زهرة

zaSecurityLowLevel2003.rar

zaSecurityLowLevel2007.rar

zaSecurityLowLevel2010.rar

zaSecurityLowLevel2013.rar

تحياتي

صديقي كل هذه الامور لا تحل المشكلة

ويجب ان تكبس على تمكين المحتو ى يدويا

وهيك ما استفدنا اشي

 

اشكرك على المرور

قام بنشر

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

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 & "\Access\Security\" & IIf(Application.Version < 12, "Level", "VBAWarnings"), "1", "REG_DWORD"

 

قام بنشر
منذ ساعه, kanory said:

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


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 & "\Access\Security\" & IIf(Application.Version < 12, "Level", "VBAWarnings"), "1", "REG_DWORD"

 

جربته اخي العزيز @kanory
نفس المشكلة لازم تكبس يدوي على تمكين المحتوى لأول مرة 
وبعده ايتك التخفيض
وهيك ما استفدنا اشي 

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.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information