طريقة الحماية عن طريق زرع الملف

[مدام ندى]

لو سمحتوا بطلب من اسأتذة الموقع ان يشرح لى أحد كيفية الحماية عن طريق زرع ملف وكيفية زرع الملف على Office 2010 , 2007

 

[.Azhar]

حتى لو تم زرع ملف فان الحماية لا تكون قوية بهكذا طريقة .

لكن الطريقة الافضل هي جعل كلمة مرور من داخل الاكسس نفسه .

وهذا شرح مفصل لعملية التشفير

[.Azhar]

وهذه طريقة اخرى بكتابة القليل من سطور VBA

شرح بالفيديو

http://www.youtube.com/watch?v=UO4HeWnuT3A

[hussein arby]

السلام عليكم ورحمة الله وبركاته هذه اجابة طريقة زرع ملف في الكمبيوتر  

1- نضع هذا الكود في نموذج البداية  نفتح خصائص النموذج ونضغط حدث ونختار حدث عند التحميل ونفتح محرر الفيجوال بيسك ونضع هذا الكود

 

If Dir("C:\WINDOWS\MOVI.txt") = "" Then
MsgBox("البرامج محمي" & vbCrLf & vbCrLf & _
    "  لتفعيل البرنامج اتصل على الرقم 123456789", _
    vbCritical + vbOKOnly, _
    "تنبيه")
DoCmd.Quit
End If

ويمكنك التعديل في الرسالة فقط  . وبعد ذلك ننشأ ملف بصيغ txt فاضي وتكتب اسمخ MOVI ونفتح my  Computer  وندخل علي ال c ونبحث عن ملف  اسمه windows ونضع فيه ملف التكس علي حسب المسار المحدد في الكود

شرح الكود 

عند فتح البرنامج انا بقله روح شيك علي ال c في ملف اسمه ويندوز شوف في ملف من صيغة txt اسمه movi موجود ولا لا اذا كان موجود يفتح البرنامج واذا لم يكن موجود يعطي رساله الموجود في الكود ويمكنك تغيير الرساله

تم تعديل أكتوبر 8, 2014 بواسطه أبـوخليل
تحسين عرض الكود