ملف لتقليل مستوى الماكرو والامان

[عمر إيهاب]

كنت محتاج ملف تقليل مستوى الأمان والماكرو 

[فارس بني هلال]

اخي العزيز

لتقليل مستوى الامان ... من قائمة ملف .... خيارات ..... مركز التوثيق .... اعدادات مركز التوثيق ...... اعدادات الماكرو ....... اشر على تمكين كافة وحدات الماكرو ( غير.......) اخر اختيار

ولا تحتاج اي ملف .. اذا كان هذا ما تقصد 

دمت في رعاية الله

 

 

[kanory]

في ٢٨‏/١‏/٢٠١٦ at 22:49, jjafferr said:

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

 

انا احد الاشخاص الذين لا يحبذ ان يستعمل الكود في تخفيف أمان الاكسس ، فقد وضعته شركة مايكروسوفت في حزمة الاوفيس حتى تحمينا من ايدي المخربين ، وفي هذا الرابط شرحت كيفية عمل مجلد موثوق به للأكسس 2007 فما فوق:

http://www.officena.net/ib/topic/66450-دمج-ملف-وتشغيله-قبل-أو-مع-بدء-اكسس/#comment-432363

 

المشكلة في كود تخفيف الامان ، انه لا يخفض مستوى أمان الاكسس لبرنامجك فقط ، وانما يخفض مستوى أمان جميع برامج الاكسس.

 

ولكننا كمبرمجين لدينا مشكلتنا ، في انه اذا ارسلت برنامجك الى شخص ما ، فلا بد من التواصل معه و اعطاؤه الخطوات كما في الرابط ، وإلا فالبرنامج لن يعمل ، لان البرنامج يشتمل على الماكرو والوحدات النمطية.

 

هنا اقدم لكم طريقة لجعل برنامجي فقط يعمل بمستوى أمان أقل ، فلا تظهر لي رسالة الأمان من الاكسس.

 

العمل كله يدور حول كود ، ويجب حفظ الكود هذا في ملف بصيغة vbs ، والذي يجب ان نفتح برنامجنا عن طريقه.

الكود يعمل على برامج الاكسس بصيغة mdb و   accdb ، والمفروض ان يعمل على جميع اصدارات الاكسس 2003 فما فوق ، وعلى الاكسس 32بت و64بت (انا هنا اطلب من الشباب تجربته بإصدارات الاكسس التي يعملون عليها ، وإخبارنا بالنتيجة لوسمحتوا).

 

اليكم طريقة العمل (رجاء انزال المرفق وفكه في المسار C:\jj ، وذلك حتى يمكنكم متابعة خطواتي):

رجاء وضع البرنامج المرفق Seq.mdb حسب المسار التالي:

C:\jj\Seq.mdb

 

الآن اذهب الى المجلد C:\jj وافتح البرنامج Seq.mdb بالنقر المزدوج ،

عند فتحه نرى رسالة أمان الاكسس  ، وهذا متوقع ، وذلك بسبب انه في مجلد غير موثوق به (رجاء لا تضف هذا المجلد كمجلد أمان ، وانما اخرج من البرنامج).

.

 

الملف الآخر المرفق Seq.vbs ، يحتوي على هذا الكود:

rem http://www.accessmvp.com/jconrad/accessjunkie/macrosecurity.html
rem expression.OpenCurrentDatabase(filepath required, Exclusive optional, bstrPassword optional)
dim o
 set o=createobject ("Access.Application")
 o.automationsecurity=1 ' set macro security LOW.
 o.opencurrentdatabase "C:\jj\Seq.mdb"
 o.usercontrol=true
 set o=nothing

.

تستطيع ان تجعله في اي مجلد (ممكن تجرب نسخه منه في اي مجلد شئت) ، وانقر مرتين على هذا الملف بُغية تشغيله ، سترى انه فتح البرنامج Seq.mdb ، وبدون رسالة أمان الاكسس ، وهو المطلوب 

 

-------------------------------------------------------------------------------------------------------------------------------------------

 

هذه الخطوة إضافية ، وهي لتحويل الملف السابق من صيغة vbs الى exe ، واختيار ايقونه للملف الجديد

 

الآن ننتقل للخطوة التالية ، وهي ، اننا لا نريد ان ايقونة vbs ، وانما نريد ايقونه خاصة لبرنامجنا.

هناك طريقتين:

1.     ايقونة مختصر البرنامج Shortcut:

وهي ان نعمل مختصر لملف Seq.vbs ، ولكن وللأسف مختصر ملف vbs يعطينا نفس ايقونة الملف نفسه ، وما عندنا طريقة لتغييرها!!

لذلك ، سنعمل مختصر لملف الاكسس ، ونغير البيانات كالصورة التاليه ، بحيث يصبح مختصر ملف vbs يحتوي على ايقونة ملف الاكسس (طبعا يمكنك ان تغير الايقونة الى اي شئ شئت):

.

.

.

.

وبهذه الطريقة غيّرنا ايقونة برنامج vbs الى ايقونه اخرى مناسبة 

 

2.     تحويل ملف vbs الى ملف تنفيذي exe ، وتختار له الايقونة التي تعجبك:

رجاء انزال البرنامج المجاني Vbs to Exe من الرابط التالي:

http://www.f2ko.de/en/v2e.php

 

احد اسباب اختياري لهذا البرنامج ، اننا نستطيع التحكم به عن طريق Commandline ايضا 

 

ثم نتبع الخطوات التالية:

ونستطيع ان نعمل لبرنامج vbs هذا كلمة سر كذلك ،

.

في الخطوة 6 تستطيع ان تكتب معلومات شركتك ،

ونختار الايقونه التي نريدها للبرنامج (الخطوة 5)

.

.

وتستطيع ان تجعله على سطح مكتب كمبيوترك 

الميزة في هذه الطريقة ، ان المستخدم لن يعرف مكان برنامج قاعدة البيانات Seq.mdb ، ولن يعرف الكود الذي كان في Seq.vbs 

 

ارجو ممن يضع ردا على الموضوع ، ان يذكر:

1. اذا اشتغل البرنامج على كمبيوتره ،

2. نسخة الاكسس التي يستخدمها.

 

 

ملاحظة:

الظاهر ان بعض متصفحات الانترنت حجبت انزال المرفق Seq.zip ، وذلك بسبب احتوائه على ملف vbs ، والذي يستخدمه الكثيرون لتخريب الكمبيوتر ،

لذلك ،

ارفق لكم Seq_2.zip والذي يحتوي على نفس ملفات Seq.zip ، ولكني غيرت صيغة الملف Seq.vbs الى Seq.txt .

بعد انزال المرفق وفك ملفاته في الكمبيوتر ، رجاء تغيير مسمى الملف Seq.txt الى Seq.vbs 

 

 

جعفر

Seq.zip

Seq_2.zip