Membuat Virus Sederhana ..cekidot

Quote:Apa sih yang muncul di benak agan setelah baca judul nya ??
Pasti banyak yang berfikir :
1. Ah lumayan juga nih kalo sampe ane tau cara buat virus nya ane bisa ngisengin temen ane suatu saat
2. Ah ane cuma sekedear pengen tau aja gimana sih cara buat virus , soalnya ane suka gondok banget klo tiba2 Laptop/Handphone/kalkulator ane kena virus
3.Ah ane buka trit ini juga cuma niat pengen liat gimana cara buat virus nya trs langsung di praktekin dan ga bakal ninggalin jejak apapun sekalipun cara buat virus nya berhasil ( jangan kesinggung yaa para SR )
Agan renunging diri aja deh agan termasuk yang mana



Yaudah gan dari pada banyak cingcau lg mendingan ane langsung kasih tau aja nih cara buat virus nya

Quote:Cara Membuat Virus Sederhana Tapi Ampuh ,iseng iseng terfikir di benak agan2 dan sista2 bagaimana ya cara membuat virus ampuh untuk merusak suatu system atau ngisengin temen :ngkakas , ide itu muncul begitu aja tanpa ada perencanaan sebelumnya, bagi agan/sista yang ingin iseng juga bisa niru cara yang ane sajikan berikut untuk membuat virus ampuh,berikut cara mudah membuat Virus Ampuh, Alat yang dibutuhkan adalah:

1. Notepad
2. Program Virus Iseng
3. Kemauan Untuk Membuatnya
4. Sekantung Plastik Cendol buat nimpuk ane klo berhasil
No.4 mah Just Kidding ko gan

Berikut cara membuat virus nya :
-Buka Notepad lalu copy paste tulisan dibawah ini

Spoilerfor Kode nya:

WScript.Sleep 18000
WScript.Sleep 1000
do
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "v"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "s"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "t"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "d"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "r"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "7"
WScript.Sleep 500
WshShell.SendKeys "3"
WScript.Sleep 500
WshShell.SendKeys "5"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "l"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "g"
WScript.Sleep 500
WshShell.SendKeys "s"
WScript.Sleep 500
WshShell.SendKeys "p"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "c"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "m"
WScript.Sleep 500
wscript.sleep 5000
loop

-Terus agan/sista Simpan file tersebut dengan format Vbs contoh Virusbuatan.vbs
Nih liat pic dibawah gan biar makin mudah dimengerti

Spoilerfor Buka:

Oke setelah di Save , agan coba Klik 2 kali untuk membuka virus tersebut,Lalu bagaiamana cara menonaktifkanya?


1. Buka Task Manager (tekan Ctrl + Alt + Delete)

Spoilerfor Lihat:

2. Masuk ke tab Processes

Spoilerfor Lihat:

3. Cari dan klik program yang sedang berjalan dengan nama wscripts.exe

Spoilerfor Lihat:

4. Matikan program tersebut (tekan End Process)

Spoilerfor Lihat:

Yang udah coba pake virus buatan pertama
Quote:Original Posted By LunarCrystal ►
wanjirr,,, keyboardnya ngetik sendiri
itu bisa di ganti kali tulisannya, tinggal di ubah hurufnya ya gan?
ane ngomen + nulis capca juga jadi ribet banget



Gimana gan mudah kan ??
Itu baru 1 gan , nih ada 1 lagi ane kasih buat agan
Simak lagi yaa gan


Quote:
Virus buatan ke 2 ini sama dengan langkah diatas hanya saja progaram yang di pakai agak sedikit beda, copy paste lagi tulisan dibawah :

Spoilerfor Code nya:

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

Simpan dengan format yang sama kayak virus buatan yang pertama tadi sekarang namain file nya virus buatan 2.vbs
Cara Menonaktifkanya juga sama aja dengan cara yang diatas
klik 2 kali untuk membuka virus tersebut, perhatikan DVD ROM akan terbuka dan tertutup dengan sendirinya tanpa henti. (kecuali pada notebook )