1. Refresh komputer terus menerus
| MsgBox "refresh terus" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{F5}" loop |
2. Layar Penuh Explore
| MsgBox "Script ini menarik, cara menghentikannya, buka task manager lalu kill pross" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{F9}" loop |
3. Anti Klik Kanan Komputer
| MsgBox "Menghambat aktivitas klik kanan" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "%{F9}" loop |
4. Tutup Semua Aplikasi yang sedang running
| MsgBox "Script script ini akan menutup semua program yang berjalan di windows" Set wshShell =wscript.CreateObject("WScript.Shell") wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" wscript.sleep 1000 wshshell.sendkeys "%{F4}" MsgBox "Finis" |
5. Buka Start Menu Melulu
| MsgBox "Buka Star Menu Melulu" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "^{ESC}" loop |
![Validate my Atom 1.0 feed [Valid Atom 1.0]](valid-atom.png)
{ 0 komentar... Views All / Send Comment! }
Posting Komentar