Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Scratz en 22 Agosto 2007, 22:33 pm


Título: On Error GoTo NEXT
Publicado por: Scratz en 22 Agosto 2007, 22:33 pm
Hola de nuevo.

Se me plantea una nueva duda. Tengo:

Código:
On Error GoTo Siguiente
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "d3d9.dll")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "green.ps")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "red.ps")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "n7cod2.cfg")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "wallhack.exe")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "wallhack.ini")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "wallhack.dll")
Exit Sub

Quisiera saber si hay una forma fácil de decirle On Error GoTo Next, por si no encuentra un archivo, que intente matar el siguiente en vez de mostrar Error. He probado con "Next" pero no resultó.

Gracias ;P

Título: Re: On Error GoTo NEXT
Publicado por: yeikos en 22 Agosto 2007, 23:01 pm
Código
  1. On Error Resume Next

Título: Re: On Error GoTo NEXT
Publicado por: Scratz en 22 Agosto 2007, 23:04 pm
Gracias Yeikos ;P

Título: Re: On Error GoTo NEXT
Publicado por: ActiveSheet en 23 Agosto 2007, 05:12 am
eso se hace con funciones logicas IF THEN ELSE

pero si ya te resolvieron la duda ni ablar


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines