[Source] Easy Edit Header (Editor de ejecutables)

Iniciado por ignorantev1.1, 6 Octubre 2010, 17:28 PM

0 Miembros y 1 Visitante están viendo este tema.

ignorantev1.1

@cobein

Pero len("c:\a")<4 = false asi que si aplica...

@BlackZerox

Esta muy bueno tu codigo   ;-), ya lo entendi  :rolleyes:


cobein

Cita de: ignorantev1.1 en  7 Octubre 2010, 16:26 PM
@cobein

Pero len("c:\a")<4 = false asi que si aplica...
Cita de: cobein en  7 Octubre 2010, 08:29 AM
Pasaba por aca y me llamo la atencion esto

If Dir(Str, vbArchive) <> "" Or Str = "" Or Len(Str) < 4 Then

no esta mal pero la logica que se utiliza para filtrar con Len(Str) < 4 dejaria de lado posibles archivos existentes con rutas validas, ejemplo una ruta relativa como ser "\<archivo>" siendo el nombre del archivo menor o igual a 2 caracteres en total, que podria ser el eqivalente a "c:\a" o como ruta relativa "\a" 




http://www.advancevb.com.ar
Más Argentino que el morcipan
Aguante el Uvita tinto, Tigre, Ford y seba123neo
Karcrack es un capo.

ignorantev1.1

Demonios  :¬¬
Aprendere a leer mas detenidamente lo prometo...

Sanlegas

Cita de: cobein en  7 Octubre 2010, 08:29 AM
Pasaba por aca y me llamo la atencion esto

If Dir(Str, vbArchive) <> "" Or Str = "" Or Len(Str) < 4 Then

no esta mal pero la logica que se utiliza para filtrar con Len(Str) < 4 dejaria de lado posibles archivos existentes con rutas validas, ejemplo una ruta relativa como ser "\<archivo>" siendo el nombre del archivo menor o igual a 2 caracteres en total, que podria ser el eqivalente a "c:\a" o como ruta relativa "\a" 

entonces asi seria lo correcto If Len(Str) > 3 And Len(Dir(Str, vbArchive)) Then  :P
(creo que no tiene caso comparar si la cadena esta vacia y luego volver a comparar si es mayor a 3)

fary

Bastante util tu programa, yo segun voi aprendiendo el PE tambien voi creando mis funciones en VB y C :)

salu2!
Un byte a la izquierda.