لقد قرأت العديد من المواضيع حول موضوع الحماية وانا افكر في هذا الموضوع خطرت ببالي فكرة وقلت هل ممكن تنفيذها من خلال الفيجوال بيسك؟؟ بعد البحث عن الكود المطلوب وجدت ان الامر ممكن وتفاجأت ان الامر بسيط جدا وكل ما عليك الا ادراج هذا الكود في حدث التشغيل للفورم ليكون كالتالي:-
Private Sub Form_Load() If App.EXEName <> "i1982" Then MsgBox "حدث خطا اثناء تشغيل البرنامج، سوف يتم اغلاقة فورا ", vbCritical End End If End Sub
عند تنفيذ البرنامج من الفيجوال بيسك لن يعمل قم بتحويل البرنامج الى ملف تنفيذي ومن ثم غير اسم الملف الى i1982 لاحظ ان البرنامج سوف يعمل دون مشاكل جرب تغيير اسم البرنامج سوف تجد انه لن يعمل....سؤال ...هل خطرت هذه الطريقة ببال احدكم وهل تظنون ان اكبر المبرمجين ممكن ان يفكر بها...
اتمنى ردودكم حول الموضوع...ولكم تحياتي
