Ops
Worlds
today : | at : | safemode : ON
> root / public_html / blogs /
name author perms com modified label

Kumpulan Script Jahil admin rwxr-xr-x 0 18.19

Filename Kumpulan Script Jahil
Permission rw-r--r--
Author admin
Date and Time 18.19
Label
Action
ali ini saya buat beberapa script yang berfungsi pada OS windows, scriptnya akan berfungsi sesuai dengan fungsinya

Tidak perlu susah ? karna script hanya di muat di notepad, type save nya cukup dengan format .VBS atau .bat

Langsung aja deh ?

1). Memberi pesan dan shutdown komputer :
@echo off
msg * Aku tidak suka kamu
shutdown -c ?Error! Kamu jelek sekali? -s
Note : save dengan .bat 




2). Menyalakan tombol Caps lock secara simultan :

Set wshShell =wscript.CreateObject(?WScript.Shell?)
do
wscript.sleep 100
wshshell.sendkeys ?{CAPSLOCK}?
loop
Note : save dengan extension .vbs


3). Buka/tutup CD drive secara terus menerus :
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
Note : save dengan Extexsion .vbs 




4). Tekan Enter secara simultan :

et wshShell = wscript.CreateObject(?WScript.Shell?)
do
wscript.sleep 100
wshshell.sendkeys ?~(enter)?
loop
Note : save dengan ex.vbs 



5). Mengetik pesan kita secara otomatis di notepad :

Script.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(?WScript.Shell?)
WshShell.Run ?notepad?
WScript.Sleep 100
WshShell.AppActivate ?Notepad?
WScript.Sleep 500
WshShell.SendKeys ?Hel?
WScript.Sleep 500
WshShell.SendKeys ?lo ?
WScript.Sleep 500
WshShell.SendKeys ?, ho?
WScript.Sleep 500
WshShell.SendKeys ?w a?
WScript.Sleep 500
WshShell.SendKeys ?re ?
WScript.Sleep 500
WshShell.SendKeys ?you?
WScript.Sleep 500
WshShell.SendKeys ?? ?
WScript.Sleep 500
WshShell.SendKeys ?I a?
WScript.Sleep 500
WshShell.SendKeys ?m g?
WScript.Sleep 500
WshShell.SendKeys ?ood?
WScript.Sleep 500
WshShell.SendKeys ? th?
WScript.Sleep 500
WshShell.SendKeys ?ank?
WScript.Sleep 500
WshShell.SendKeys ?s! ?
 Note : save dengan Ex.vbs

Segini dulu yah ..

Tunggu update'annya

0 komentar:

Posting Komentar

 

Jayalah Indonesiaku © 2010 Ops on the Worlds