elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [Batch] [Aporte] (O eso creo xD) Consola de reciclaje v1.0
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [Batch] [Aporte] (O eso creo xD) Consola de reciclaje v1.0  (Leído 2,013 veces)
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.709



Ver Perfil
[Batch] [Aporte] (O eso creo xD) Consola de reciclaje v1.0
« en: 3 Febrero 2012, 07:29 am »

Bueno, una persona me pidió ayuda para crear un código que pueda eliminar archivos arrastrandolos hasta la consola

Al principio parecia fácil, pero no lo es para nada, cuando arrastras los archivos, si tienen espacio apareceran con comillas dobles, y sino, sin comillas

Por eso, habia que separar el string en varios, no iba a funcionar con parámetros

En fin, Aqui tienen este experimento, La consola de reciclaje 1.0  :xD

PD: Odio crear contadores de este tipo








Código:
@Echo off
Title Consola de reciclaje v1.0


REM: By Elektro H@cker





:Basurero
:::::::::
Mode con cols=70 lines=20
Nircmd win center ititle "Consola de reciclaje" >nul 2>&1
Setlocal enabledelayedexpansion
Set min=0
Set max=1
Color 1f

Cls
Echo+
Echo:   Arrastre hasta aqu¡ los archivos o carpetas que desea eliminar.
Echo+
Echo+
Set /P Archivos=^>^>^>

If not defined archivos (Goto :Basurero)

Echo %Archivos% | FIND ":" >NUL
If NOT %ERRORLEVEL% EQU 0 (Goto :Basurero)

Set archivos=%archivos%##





:FILTRAR
::::::::

cls
Echo+
Echo: Eliminando los archivos, Porfavor Espere...
Echo+


:Bucle
Echo !string! | find "#" >NUL 2>&1
call :limite
Set String=!archivos:~%min%,%max%!;

echo ^!string:~-2! | findstr ":" >NUL
If %errorlevel% equ 0 (
Set String=!string:~-3,2!\!String!
Set String=!string:^"=!
Set /A max+=1
Set /A Min+=!MAX!
Set max=1
call :ELIMINAR !String:~0,-3!
goto :Bucle
) else (
Set /A max+=1
Goto :Bucle
)

:Limite
if %errorlevel% equ 0 (
Set /A min-=3
Set /A max+=1
call :string_Final
call :ELIMINAR !String:~0,-1!
Goto :FIN
)
GOTO :EOF

:string_Final
Set String=!archivos:~%min%,%max%!;
Set String=!string:^"=!
goto :EOF





:ELIMINAR
:::::::::
If /I "%*" EQU "C:\" (GOTO :EOF)
If /I "%*" EQU "D:\" (GOTO :EOF)
If /I "%*" EQU "E:\" (GOTO :EOF)
If /I "%*" EQU "F:\" (GOTO :EOF)
If /I "%*" EQU "G:\" (GOTO :EOF)
If /I "%*" EQU "H:\" (GOTO :EOF)



:Archivo
For /F "Tokens=*" %%# IN ('echo "%*"') do (
Del /Q /F %%# >NUL 2>&1
Call :Carpeta %%#
)
GOTO :EOF

:Carpeta

If Exist %* (
Echo+
Echo: Eliminando carpeta: %*
RD /Q /S %*
) ELSE (
Echo+
Echo: Eliminando archivo: "%~nx1"
)
Goto :EOF





:FIN
::::

Cls
Echo+
Echo: Se han borrado todos los archivos.
Echo+
Pause
exit


En línea


Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Batch] Vaciar Papelera de Reciclaje « 1 2 »
Scripting
invisible_hack 15 24,604 Último mensaje 7 Marzo 2009, 03:52 am
por SmartGenius
[APORTE] Usando consola con Threads (aka: consola estilo quake) :D
.NET (C#, VB.NET, ASP)
raul338 0 2,776 Último mensaje 6 Marzo 2010, 17:27 pm
por raul338
[Aporte] Java-Leer cantidades (consola)
Java
Senior++ 2 1,922 Último mensaje 16 Julio 2012, 06:26 am
por hucruz
[C++] [Aporte] Buscaminas por consola
Programación C/C++
Wofo 5 5,820 Último mensaje 15 Marzo 2013, 11:18 am
por Wofo
Ayuda, cómo creo este script en consola de linux.
Scripting
walac 3 785 Último mensaje 15 Mayo 2018, 22:10 pm
por walac
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines