Fungsi notepad memang banyak, tapi kali ini saya akan menunjukkan sedikit dari banyaknya code-code pemrograman untuk notepad .. :
1. Otomatis 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. (contoh, otomatis.vbs)
Lalu Buka File Tersebut
2. Otomatis Mengetik 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. (contoh, Menulis.vbs)
Lalu Buka File Tersebut
3. Membuat Pesan muncul berulang – ulang
Copy script dibawah ini dan paste di notepad anda.
@ECHO off
:Begin
msg * hahahhaa
msg * santai boss
msg * ini hanya main-main
msg * jangan marah ya
msg * kunjungi blog saya di, blog-prayoga.blogspot.com
GOTO BEGIN
Simpan dengan format *.bat. (contoh, muncul.bat)
Lalu Buka File Tersebut
4. Membuat Komputer Shutdown dengan muncul pesan.
Copy script dibawah ini dan paste di notepad anda.
@echo off
msg * Mampus Kau..
shutdown -s -c “Komputer anda mati”
Simpan dengan format *.bat. (contoh, shutdown.bat)
Lalu Buka File Tersebut
5. Membuat Tombol Capslock terus menyala
Copy script dibawah ini dan paste di notepad anda.
--> Set wshShell =wscript.CreateObject(“WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys
“{CAPSLOCK}” loop
Simpan dengan format *.vbs (contoh, capslock.vbs)
Lalu Buka File Tersebut
6. Membuat Virus Sederhana
Copy script dibawah ini dan paste di notepad anda.
Simpan dengan format *.vbs (contoh, virus.vbs)
lol=msgbox ("Warning a virus has been detected on your PC. Press YES to format your hard disk now or press NO to format your hard disk after system reboot",20,"Warning")
Lalu nanti setelah terbuka pilih Yes atau No
Sekian Postingan kali ini, terima kasih sudah berkunjung! :)
No comments:
Post a Comment