İPUCU

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

Seçenekler

Şaka Virüsü//M4K4R

20-11-2017 16:18
#1
M4K4R - ait Kullanıcı Resmi (Avatar)
E-Mail onayı yapılmamış üye
Üyelik tarihi:
03/2017
Mesajlar:
4.266
Teşekkür (Etti):
131
Teşekkür (Aldı):
847
Konular:
241
Ticaret:
(0) %
Kod:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Bu bir virustur."
loop
Bu bir virustur sözünü istediğiniz bir şey yazarak degise bilirsiniz.
Bunları yaptıktan sonra txt metinin sonuna .vbs ekliyorsunuz, üzerine 1defa tıklayıb istediyiniz bir yere giris yapın ve olacakları gorun
Bu virusu sonlandırmak için Ctrl+ Alt+ Del basın ve Gorev Yoneticisinden sonlandırın.
Bu virüsun amacı yazamak imkaniz oldu her yere avtomatik bir sekilde giriyo ve Bu bir virustur yaziyor durmadan.
Konu M4K4R tarafından (20-11-2017 16:42 Saat 16:42 ) değiştirilmiştir.

20-11-2017 16:40
#2
S1NYOR - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
06/2015
Nereden:
TeXaS..
Mesajlar:
1.533
Teşekkür (Etti):
140
Teşekkür (Aldı):
148
Konular:
135
Ticaret:
(0) %
Ne yapiyor bu virus hocam
Kullanıcı İmzası
En büyük korkum bir gün unutulmak olucaktır.
CALİGULA
20-11-2017 16:43
#3
M4K4R - ait Kullanıcı Resmi (Avatar)
E-Mail onayı yapılmamış üye
Üyelik tarihi:
03/2017
Mesajlar:
4.266
Teşekkür (Etti):
131
Teşekkür (Aldı):
847
Konular:
241
Ticaret:
(0) %
Alıntı:
yenier123´isimli üyeden Alıntı Mesajı göster
Ne yapiyor bu virus hocam
Kusura bakma konuyu bitirmemisdim cıkmak zorunda kaldım ama suan bitirdim.
Manyak Saka
20-11-2017 16:46
#4
Üyelik tarihi:
10/2017
Nereden:
T Ü R K
Yaş:
20
Mesajlar:
664
Teşekkür (Etti):
10
Teşekkür (Aldı):
89
Konular:
80
Ticaret:
(0) %
Bu script sürekli olarak CD-Rom kapağınızı açıp kapayacaktır.
1.Notepad'i açın, Şu kodları kopyala yapıştır ile notepad'in içine yapıştırın.

Kod:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >=1 then
do
For i=0 to colCDROMs.COunt -1
colCDROMs.Item(i).Eject
Next ' cdrom
For i=0 to colCDROMs.COunt -1
colCDROMs.Item(i).Eject
Next ' cdrom
loop
End If
2. Notepad'de Dosya'dan Farklı Kaydet'e gelin ve dosya adına cdrom.vbs yazın.
Kayıt türü olarak Tüm Dosyalar seçin
3. Sonra cdrom.vbs dosyasını iki kere tıklayın. Siz delirene kadar Cd-Rom kapağınız otomatik açılıp kapanacaktır.
4. Sonlandırmak için Görev yöneticisinden wscript.exe dosyasını bulup Görevi Sonlandır yapın.
Kullanıcı İmzası
Social Media Manager / Cracker /

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ı