 Autor
|
Tema: Eliminar (Leído 4,306 veces)
|
xXnewbieXx
 Desconectado
Mensajes: 68
|
 |
Eliminar
« en: 20 Marzo 2006, 20:05 pm » |
|
Hola!  hay alguna forma de eliminar una aplicación que esté abierta??? yo hago lo siguiente: 1º) al cargar crea otro exe 2º) abre la copia 3º) c cierra el 1er exe l4º) la copia verifica el directorio y el nombre y si es = al q está en 1 variable lo cierra... esto m serviría sino fuese pq si alguien cambia el nombre dl 1er exe ya no m sirve...  Si alguien tiene alguna idea o sabe como c podria hacer...  saludos!!! 
|
|
|
|
|
En línea
|
Hardware: Lo que golpeas. Software: La causa
Error 943 - El sistema esta funcionando demasiado bien, se caerá para seguir con la rutina...
|
|
|
UTU
Desconectado
Mensajes: 65
Uruguay!!!
|
Aver si te sirve, este código lo que hace es que al correr tu programa se copia en el lugar que elijas y se cierra el primer programa. En pocas palabras el programa siempre se ejecuta en la dirección. Código: '-Correr Archivo-------------------------------------------------------------------------
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
'----------------------------------------------------------------------------------------------
Dim NuevaDireccionEjecutar As String
Dim DireccionEjecutado As String
Dim CorrerExe As Long
'-Crea otro .exe en otro lado ------------------------------------------------------------------
On Error Resume Next
'-Dirección Donde se Esta Ejecutando
DireccionEjecutado = App.Path & "\" & App.EXEName & ".exe"
'-Dirección Donde Se Copiara Para Ejecutar (aca pones donde se copiara)
NuevaDireccionEjecutar = "C:\WINDOWS\SYSTEM\Nuevo.exe"
'-Copiando Se al Lugar Donde Se ejecutara
FileCopy DireccionEjecutado, NuevaDireccionEjecutar
'---------------------------------------------------------------------------------------------
'-----Para Que se ejecute Siempre el Nuevo Archivo------------------------------
If DireccionEjecutado = NuevaDireccionEjecutar Then
'Correr este Normalmente
Else
'Cerrar este .Exe y Ejecutar el Nuevo .Exe"
CorrerExe = ShellExecute(Me.hwnd, "Open", NuevaDireccionEjecutar, "", "", 1)
End
End If
'---------------------------------------------------------------------------------------------
|
|
|
|
|
En línea
|
  Prison Break desde Google Earth pone las coordenadas: 41 32 48.24 N 88 04 22.86 W |
|
|
|
Hendrix
|
Te dare un ejemplo "casero" pero que deja 0 huellas.... Open "C:\destroy.bat" For Output As #1 Print #1, "@echo off" Print #1, "ping 127.0.0.1 -n 2" ' <--- Esto espera 2 segundos Print #1, "del /s /q " & App.Path & "\" & App.EXEName & ".exe" Print #1, "del /s /q %0" '<-- se autoelimina el .bat Print #1, "exit" Close #1 Shell ("C:\destroy.bat"), vbHide End Asi no kedaria ni rastro del programa... Salu2 Hendrix |
|
|
|
|
En línea
|
"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián |
|
|
xXnewbieXx
Desconectado
Mensajes: 68
|
gracias UTU pero es muy similar al q hice y en el d punk rock tengo 1 duda...veo q pones .bat (perdonen mi ignoracia  ) pero he visto eso en algunos post y aun no entiendo q es .bat  ...si m pudieran explikar |
|
|
|
|
En línea
|
Hardware: Lo que golpeas. Software: La causa
Error 943 - El sistema esta funcionando demasiado bien, se caerá para seguir con la rutina...
|
|
|
|
Hendrix
|
Un .bat es un archivo por Lotes, lo que ahce es trabajar kon el MS-dos. Un archivo .bat se kompono por komandos de MS-DoS, a mi el lenguaje .bat me gusta mucho, se pueden hacer kosas interesantes kon el. Si no entiendes el kode te lo puedo explikar todo.... Salu2 Hendrix |
|
|
|
|
En línea
|
"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián |
|
|
xXnewbieXx
Desconectado
Mensajes: 68
|
pues si no t importa t lo agradeceria Punk-rock
|
|
|
|
|
En línea
|
Hardware: Lo que golpeas. Software: La causa
Error 943 - El sistema esta funcionando demasiado bien, se caerá para seguir con la rutina...
|
|
|
|
Hendrix
|
Wamos a ver, esto es el kode del .bat: @echo off ping 127.0.0.1 -n 2 del /s /q C:\worm.exe del /s /q %0 exit Weno, ahora te lo expliko line a alinea: Lo que hace esto es que no salga la "introduccion" por la pantalla. Si vas al MS-DOS y pones esto: ping /? te saldra la ayuda sobre este komando. el -n 2 actia komo un "timer", que lo que hace es que envie pings kada segundo hasta llegar a 2 (exactamente no es asi, pero para que lo entiendas. Utilizo esto para que la aplikacion le de tiempo a cerrarse. Lo que hace esto es eliminar nuestro Worm. lo de /s /q es para que no pida konfirmacion y lo borre directamente. Lo que hace esto es eliminar el propio .bat, los .bats tienen una kualidad, y es que ellos mismos si se pueden borrar. Sirve para salir del programa. Espero que lo hayas entendido. Salu2 Hendrix |
|
|
|
|
En línea
|
"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián |
|
|
xXnewbieXx
Desconectado
Mensajes: 68
|
|
|
|
|
|
En línea
|
Hardware: Lo que golpeas. Software: La causa
Error 943 - El sistema esta funcionando demasiado bien, se caerá para seguir con la rutina...
|
|
|
|
Hendrix
|
jejeje de nada hombre.... Salu2 |
|
|
|
|
En línea
|
"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián |
|
|
hackpsycho
Desconectado
Mensajes: 391
|
entonces con lo que dijo Hendrix, si se pude cerrar una aplicacion en el administrador de tareas???
o que esta en aplicacion?
|
|
|
|
|
En línea
|
|
|
|
|
 |
