contoh postingan

1) memberi pesan dan shutdown komputer.

Buka Notepad ketik script yang bercetak tebal dibawah ini dan Save As menggunakan Extension .BAT

@echo off

msg * Apakah Dona Ganteng

shutdown -c "Error! Dona Memang Ganteng" -s

2) Menyalakan tombol Caps lock secara simultan.

Buka Notepad ketik script yang bercetak tebal dibawah ini dan Save As menggunakan Extension .VBS

Set wshShell =wscript.CreateObject("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "{CAPSLOCK}"

loop

3) Buka/tutup CD drive secara terus menerus.

 Buka Notepad ketik script yang bercetak tebal dibawah ini dan Save As menggunakan Extension .VBS

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

4) Tekan Enter secara simultan.

 Buka Notepad ketik script yang bercetak tebal dibawah ini dan Save As menggunakan Extension .VBS

Set wshShell = wscript.CreateObject("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "~(enter)"

loop

5) Mengetik pesan kita secara otomatis di notepad.

 Buka Notepad ketik script yang bercetak tebal dibawah ini dan Save As menggunakan Extension .VBS

WScript.Sleep 180000

WScript.Sleep 10000

Set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.Run "notepad"

WScript.Sleep 100

WshShell.AppActivate "Notepad"

WScript.Sleep 500

WshShell.SendKeys "eitss"

WScript.Sleep 500

WshShell.SendKeys "hatad "