استفسار عن كود مسار للبرنامج

[hussein arby]

السلام عليكم ورحمة الله وبركاته   اخوني اعضاء ومشرفي المنتدي المحترمين  وجدت في بعض البرامج  كود لتحديد مسارر برنامج  بحيث لو تم نقل هذا البرنامج الي جهاز اخر او تمت فرمته الويندوز لايعمل البرنامج ويعطي رسالة  كما في الكود  كل مافهمته اني في ملف في الويندوز علي  c   فكيف عمل هذا الملف لربطه بالكود  وهذا هو الكود للتوضيح

 If Dir("C:\WINDOWS\MOVI.INI") = "" Then
MsgBox "لا يحق لك الدخول الي النظام", vbOKOnly, "اتصل بمدير النظام فورا*6414192* "


DoCmd.Quit
End If

 

اسم الفورم  الذي به الكود form1  hv  اريد معرفة كيفية عمل هذه الطريقة

تم تعديل يونيو 24, 2014 بواسطه أبو آدم
احتواء الكود

[أبو آدم]

أخي حسين

حسب ما فهمت الكود فهو ليس لتحديد مسار البرنامج ، وانما هو للبحث عن ملف مزروع في مكان محدد من الجهاز ( لغايات الحماية )

نقوم باستدعاء الملف و البحث عنه ، وحال العثور عليه يتم تشغيل النظام ، وخلافا لذلك يتم الخروج من النظام

[hussein arby]

اخي ابو ادم شكرا علي الرد   لو تكرمت اريد ان اعرف كيفية عمل ذالك الملف  اذا امكن ولك جزيل الشكر

[أبو آدم]

أخي حسين

 

يمكن استخدام نفس الفكرة ( من باب الحماية )

بحصر امكانية تشغيل النظام حال وجوده في مسار محدد وقرص محدد ، وحال تغيير المسار او القرص يعترض النظام ويتم اغلاق التطبيق

 

وحسب المرفق

 

ضع التطبيق المرفق مباشرة على القرص c وجرب التشغيل

انقل التطبيق للقرص d او ضمن اي مجلد في القرص c وجرب التشغيل

 

جرب ووافني بالنتيجة

 

والله من وراء القصد

 

NA_Rootexample.rar

[hussein arby]

شكرا اخي الفاضل هذه الطريقه انا جربتها  واشتغلت معي 100% يعطيك الف عافيه 

تم تعديل يونيو 24, 2014 بواسطه حسين العربي

[أبو آدم]

هل تود تجربة طريقة زراعة ملف في الجهاز ؟

[hussein arby]

ياريت والله اخي ابو ادم اكون  شاكر ليك والله

[hussein arby]

انا منتظر الرد اخي ابو ادم

[hussein arby]

اخي ابو ادم شكرا لك علي جهودك معي انا وصلت لفكره كيفية زراعة ملف في الويندوز وهذا بفضل الله ثم مجهودك العظيم معي

[أبو آدم]

الحمد لله الذي بفضله تقضى الحاجات

 

عموماً سارفق تطبيقا به فكرة خطرت ببالي وهي قيد التطبيق

 

تقريبا انتهيت من التطبيق و سأجعله في موضوع جديد إن شاء الله

 

......

[أبو آدم]

لعموم الفائدة :

زراعة ملف ( مخفي ) في الجهاز لأغراض الحماية ..... http://www.officena.net/ib/index.php?showtopic=54499