Do you like this story?
Trik kali ini hanya untuk sekedar iseng-iseng saja, dan mohon jangan dipakai keseringan karena dampaknya akan membuat temen kita marah sama komputer (bisa-bisa dibanting komputernya).
Modal untuk Jailin Komputer Temen cuma dengan Notepad atau Text Document. Caranya cukup mudah, anda Copy Paste saja kode-kode berikut pada Notepad atau Text Document, terus Save As dan jagan lupa penyimpanannya harus pakai ektensi seperti yang akan dijelaskan di bawah ini.
- Pesan Restart - (Save dalam ektensi .BAT )
@KAPOK off
:Begin
msg * WARNING !
msg * Komputer anda error
msg * Tidak ada cara lain
msg * Harus diinstall ulang
GOTO BEGIN
- Pesan Shutdown - (Save dalam ektensi .BAT )
Quote:
@Trends off
msg * Komputer anda hank
msg * Tidak ada jalan lain
msg * Harus dishutdown
- Tombol Caps Lock hidup terus - ( Save dalam ektensi .VBS )
Quote:
Set wshShell =wscript.CreateObject("WScript.Shell") do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}" loop
- Terkena Virus - ( Save dalam ektensi .HTML )
<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>
- CD Room Buka-Tutup Terus - ( Save dalam ektensi .VBS )
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
- Menekan Enter Terus Menerus - ( Save dalam ektensi .VBS )
Quote:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
"SELAMAT MENCOBA"
3 komentar:
Whhaha.. la nanti cra ngebalikinnya gmana sob??
"UNTUK MENGEMBALIKAN TINGGAL DI RESTART AJA COMPUTERNYA"
kunjungan balik sob,lam knal..
Posting Komentar
Kebijakan Berkomentar akan dihapus, jika tidak sesuai dengan apa yang sudah ditulis dibawah ini:
» Menggunakan bahasa yang tidak sopan (Sara, Pornografi, Menyinggung)
» Duplikat komentar
» Komentar menautkan link secara langsung
» Komentar tidak berkaitan dengan artikel
» Judul Komentar Berupa Promosi