Foro de elhacker.net

@ECHO OFF & CHCP 1252 1>NUL & REM Modifico el código de ágina al CP WINDOWS-1252.
 
REM by .:: Elektro H@cker ::.
REM para los usuarios de ElHacker.net
REM
REM Asegurarse de guardar este script en codificación ANSI, no UTF, no Unicode.
REM
 
:: # WMI Class Win32_LogicalDisk Help
::
:: Drivetype 2: Removable
:: Drivetype 3: Local hard disk
:: Drivetype 4: Network disk
::
:: For Syntax: wmic logicaldisk get caption^,drivetype ^| FIND "(DriveType)      "
 
REM Filtro el output del comando WMIC.
For /F %%# in (
	'wmic logicaldisk get caption^,drivetype ^| FIND "3      "'
) Do (
	REM Saco las letras de los dispositivos disponibles.
	Call Set "Drives=%%DRIVES%%%%#"
)
 
REM Elimino el caracter ":".
Set "Drives=%DRIVES::=%"
 
REM Pregunto al usuario.
Choice /C %DRIVES% /M "Elige una unidad:"
 
REM Seteo la posición inicial del Substring para sacar la letra elegida por el usuario.
Set /A "DriveIndex=%ERRORLEVEL% - 1"
 
REM Finálmente seteo la letra elegida por el usuario.
Call Set "Drive=%%DRIVES:~%DriveIndex%,1%%"
 
REM Retiro todos los atributos de los archivos y carpetas.
Attrib -a -r -s -h -i /D /S "%Drive%:\*"
 
REM Proceso todas las carpetas de la unidad para renombrar las que contienen el caracter (ALT+255)
REM La expresión "%Drive%:\* " no contiene un simple caracter de Espacio, usa el caracter ALT+255.
For /D /R %%# in ("%Drive%:\* ") Do (
	(
          Rename "%%~#" "Recovered_Files"
        ) || (
          Call Rename "%%~#" "Recovered_Files %%RANDOM%%"
        )
)
 
Pause&Exit