Reto 16(V3ctor) Elimina .png Repetidas

Reto 16(V3ctor) Elimina .png Repetidas
Artículo
Citar    Descargar mensaje  
Mensaje Re: Reto 16(V3ctor) Elimina .png Repetidas 
 
aquí esta:

pngs = Dir(DirBox1.Value, "*.png", gb.File)


yo ahi puse filtro png pero se puede poner y adaptar a cualquiera otra extension incluso usando "*", peligroso ojo no lo he probado, el código esta desprolijo lo se, pero yo quería el objetivo, uf si me faltara para ser programador!!.

EliminarDuplicados-0.1.2.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-0.1.2.tar.gz
Tamaño: 13.04 KB
Descargado: 82 veces
EliminarDuplicados-0.1.2.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-0.1.2.tar.gz
Tamaño: 13.04 KB
Descargado: 82 veces
EliminarDuplicados-0.1.2.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-0.1.2.tar.gz
Tamaño: 13.04 KB
Descargado: 82 veces




 
última edición por v3ctor el Viernes, 01 May 2020, 18:26; editado 1 vez 
v3ctor - Perfil MP  
v3ctor [ Viernes, 01 May 2020, 18:22 ]


Reto 16(V3ctor) Elimina .png Repetidas
Comentarios
Citar    Descargar mensaje  
Mensaje Re: Reto 16(V3ctor) Elimina .png Repetidas 
 
Me gusta. Es bastante rápido. He añadido algunas características que pueden ser de interés.

EliminarDuplicados-CO-0.1.5.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-CO-0.1.5.tar.gz
Tamaño: 15.42 KB
Descargado: 81 veces
EliminarDuplicados-CO-0.1.5.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-CO-0.1.5.tar.gz
Tamaño: 15.42 KB
Descargado: 81 veces
EliminarDuplicados-CO-0.1.5.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-CO-0.1.5.tar.gz
Tamaño: 15.42 KB
Descargado: 81 veces




 
cogier - Perfil MP  
cogier [ Viernes, 01 May 2020, 18:45 ]
Citar    Descargar mensaje  
Mensaje Re: Reto 16(V3ctor) Elimina .png Repetidas 
 
'comando = "sha256sum " & DirBox1.Value &/ png  
    comando = "sha256sum " & Shell$(DirBox1.Value &/ png)


jaja bien cogier detectaste un error, la primera linea da error si los nombres tienen espacio u otros caracteres, lo que hace shell$ es entregar una linea correcta y depurada para que el shell con el comando no de error. yo lo probé con png que su nombre es numero.png (no hay espacios entre otras cosas) por eso no tiraba error.



 
v3ctor - Perfil MP  
v3ctor [ Viernes, 01 May 2020, 19:17 ]
Citar    Descargar mensaje  
Mensaje Re: Reto 16(V3ctor) Elimina .png Repetidas 
 
jguardon escribió: [Ver mensaje]
Tengo el mío casi acabado, pero creo un hash MD5 después de leer el archivo binario (es más rápido que SHA256)...


si es mas rápido podemos agregarle al código la opción de hacer con md5 o sha256!!!  va también sha512 (hecho)

EliminarDuplicados-CO-0.1.7.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-CO-0.1.7.tar.gz
Tamaño: 15.65 KB
Descargado: 96 veces
EliminarDuplicados-CO-0.1.7.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-CO-0.1.7.tar.gz
Tamaño: 15.65 KB
Descargado: 96 veces
EliminarDuplicados-CO-0.1.7.tar.gz
Descripción:  
Descargar
Nombre del archivo: EliminarDuplicados-CO-0.1.7.tar.gz
Tamaño: 15.65 KB
Descargado: 96 veces




 
última edición por v3ctor el Viernes, 01 May 2020, 19:49; editado 2 veces 
v3ctor - Perfil MP  
v3ctor [ Viernes, 01 May 2020, 19:20 ]
Citar    Descargar mensaje  
Mensaje Re: Reto 16(V3ctor) Elimina .png Repetidas 
 
FUNCIONA!!!

jamas me hubiese imaginado que esas imágenes con nombres tan diferentes eran iguales

captura_de_pantalla_de_2020_05_01_19_28_53



 
tercoIDE - Perfil MP  
tercoIDE [ Viernes, 01 May 2020, 23:33 ]
Mostrar mensajes anteriores:    
Publicar nuevo tema  Responder al tema  Página 2 de 2
Ir a la página Anterior  1, 2
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 


   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.1122s (PHP: -28% SQL: 128%)
Consultas SQL: 27 - Debug off - GZIP Activado