Tips dan Trik Notepad - Scripting

Di malam yang sunyi ini, saya tidak akan membagikan software atau game, melainkan hanyalah sebuah script - script notepad sederhana. Coba script berikut ini.

1. Menulis otomatis di notepad
Copy script dibawah ini dan paste di notepad anda.

Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Tulisan ini akan menulis sendiri di notepad anda”
loop

Simpan dengan format *.vbs. Lalu Buka File Tersebut2. Membuka notepad Terus – menerus
Copy script dibawah ini dan paste di notepad anda.

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

Simpan dengan format *.bat. Lalu Buka File Tersebut3. Membuka dan menutup CD/DVD Komputer
Copy script dibawah ini dan paste di notepad anda.

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

Simpan dengan format *.vbs. Lalu Buka File Tersebut