Cara seperti ini sudah saya coba sendiri dan berhasil. sekarang saya ingin coba berbagi sama kalian, langsung aja ke langkah-langkah berikut.
- Copy
code dibawah ini di notepad
Set wshShell
=wscript.CreateObject("WScript.Shell")
do
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
do
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
- Save AS
-
Pada "File Name" beri : finderonly.vbs
-
Pada "Save As Type"ganti dengan : All Files
Pada "Encoding" : ANSI
Pada "Save As Type"ganti dengan : All Files
Pada "Encoding" : ANSI
- Klik
2 Kali Pada file tadi finderonly.vbs dan lihat
hasilnya
- Tekan
Tombol "Caps Lock"
berulang kali, agar terlihat efek Disko
Makin Asyik.
Untuk menghilangkannya / kembali ke Asalnya : CTRL+ALT+DELETE, Cari "wscript.exe" Klik 1 kali dan klik
“End Process”