Эхлээд notepad нээх хэрэгтэй
Тэгээд үүнийг хуул

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop

Хуулсан бол хадгалахдаа file цэснээс нь save as гэж байгаад ezaluus.vbs гэж хадагла.
Ингээд үүнийгээ Messenger - ээр найзруугаа явуулаад үзнэ үү? яана уу? таны дур
Үр дүн нь CAPSLOCK гэнт өөрөө асна унтраах гэхээр болохгүй...