Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: xXnewbieXx en 20 Marzo 2006, 20:05 pm



Título: Eliminar
Publicado por: xXnewbieXx en 20 Marzo 2006, 20:05 pm
Hola! :huh: :huh: :huh: 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... :P

saludos!!! ;)



Título: Re: Eliminar
Publicado por: UTU en 20 Marzo 2006, 21:44 pm
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:

Citar
'-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
'---------------------------------------------------------------------------------------------


Título: Re: Eliminar
Publicado por: Hendrix en 20 Marzo 2006, 21:54 pm
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



Título: Re: Eliminar
Publicado por: xXnewbieXx en 21 Marzo 2006, 16:51 pm
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 :rolleyes:
...si m pudieran explikar :rolleyes: :P


Título: Re: Eliminar
Publicado por: Hendrix en 21 Marzo 2006, 17:19 pm
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



Título: Re: Eliminar
Publicado por: xXnewbieXx en 21 Marzo 2006, 19:18 pm
 :P pues si no t importa t lo agradeceria Punk-rock


Título: Re: Eliminar
Publicado por: Hendrix en 21 Marzo 2006, 19:55 pm
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:

Código:
@echo off

Lo que hace esto es que no salga la "introduccion" por la pantalla.

Código:
ping 127.0.0.1 -n 2

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.

Código:
del /s /q C:\worm.exe

Lo que hace esto es eliminar nuestro Worm. lo de /s /q es para que no pida konfirmacion y lo borre directamente.

Código:
del /s /q %0

Lo que hace esto es eliminar el propio .bat, los .bats tienen una kualidad, y es que ellos mismos si se pueden borrar.

Código:
exit

Sirve para salir del programa.

Espero que lo hayas entendido.

Salu2

Hendrix



Título: Re: Eliminar
Publicado por: xXnewbieXx en 21 Marzo 2006, 20:48 pm
 ;D ;D ;D ahora si ksi, muxisimas gracias  ;) ;) ;)


Título: Re: Eliminar
Publicado por: Hendrix en 21 Marzo 2006, 20:54 pm
jejeje de nada hombre.... ;) ;) ;)

Salu2



Título: Re: Eliminar
Publicado por: hackpsycho en 23 Marzo 2006, 05:30 am
entonces con lo que dijo Hendrix, si se pude cerrar una aplicacion en el administrador de tareas???
o que esta en aplicacion?


Título: Re: Eliminar
Publicado por: Hendrix en 23 Marzo 2006, 13:28 pm
Claro que se puede cerrar, de echo, yo tengo un AV Killer echo en batch (y despues pasado a exe). que funciona de PM.

Si kieres te paso un link...

Salu2

Hendrix



Título: Re: Eliminar
Publicado por: hackpsycho en 23 Marzo 2006, 23:32 pm
aver pasalo si kieres k sea por privado, como gustes  :)


Título: Re: Eliminar
Publicado por: Hendrix en 23 Marzo 2006, 23:41 pm
Esta en mi foro:

http://www.foro.ws/foro/post/AV-Killer_en_batch_By_Hendrix_11-128961

Salu2

Hendrix