script usil. .hi hi hi

Pertama kalian siapkan notepad. Dan tinggal copas ni ajah, trus di save pake eksistensi .vbs (”nama file.vbs”) dan 1 yang terakhir dengan format .bat (”nama file.bat”) .

Berikut yang bereksistensi .vbs :

* Membuat CD/DVD room membuka dan menutup sendiri

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

* Membuat lampu Num Lock, Caps Lock, Soroll Lock nyala mati dengan otomatis dan berirama (kelap kelip)

Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
wshshell.sendkeys “{NUMLOCK}”
wshshell.sendkeys “{SCROLLLOCK}”
loop

* Nongolin file bereksistensi .vbs

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

Bereksistensi .bat

* Shutdown PC otomatis

@echo off
msg * kena lu ma gw
shutdown -s -c “Error! mampus lu mati kompinya”

nb : jangan lupa dicoba!kalo kamu ga sengaja mencetnya restart ja PC mu.

GANDESIGNLAB