Foro de elhacker.net

bueno lo pregunto aca... xq no vi en el foro otro q diga batch xD
aparte la preg seguro la saben.. esta relazionada con VB y con los troyanos

bueno lo q quiero hacer es q mi troyano se pueda eliminar si yo le ordeno...
ahora hice un batch q lo borra y luego se borra a si mismo... pero es q cuando el server ejecuta el batch, luego se cierra, antes de cerrarse el batch como q no pudo borrarlo...
en fin quiero saber como hacer algo asi como un timer... donde le de 1 seg a q se cierre el servidor y luego lo borre...

hasta ahora tenia esto:

SALUDOS

wenas, usa esto:
del /q /f archivo

si quieres cerrar el proceso del exe, antes haz esto:
taskkill /f /im nombredelexe

un saludo

Scripting (https://foro.elhacker.net/scripting-b64.0/)<---click
En el mismo subforo tienes rutinas para hacer esperas antes de realizar una determinada acción.
Ahora el caso es.. porque utilizas bat si estas programando en vb? lo mejor sería utilizar el propio lenguaje para borrar el archivo  :rolleyes:
[Source] How to Melt a file in VB6 (http://foro.elhacker.net/programacion_vb/source_how_to_melt_a_file_in_vb6-t164724.0.html;msg777286#msg777286)<---click

Saludos

Creo que no te hace falta un timer. Usa

Private Sub Form_Unload(Cancel As Integer)
shell "archivo.bat"
End Sub

Espero que te funcione

Para esperar 5 segundos:

Si quieres hacer con VB puedes hacerlo de esta forma:

Shell "cmd /c ping 0.0.0.0 -n 5 -w 100 & del archivo1.bat & del archivo2.exe"

El simbolo '&' separa las diferentes acciones a realizar...

Saludos ;)

PD: Espero haberme explicado bien, voy con prisa :-X :xD

bueno respondiendo un poco a todos... es q en VB no se puede autoeliminar un archivo... yo antes hacia algo parecido al ejemplo, creaba otro archivo q elminaba al servidor... pero quedaba este ultimo :S..
lo q luego aprendi fue q los batch si se pueden autoeliminar x lo q los estudie un poco y me parecio q seria la mejor forma...

creo q eso es lo q buscaba ;)

gracias

SALUDOS

pude lograrlo.. muchas gracias...
x si alguien quiere el code xD aunque esta en VB... (menos el texto plano del batch)

Private Sub Command1_Click()
Open App.Path & "\nombre.bat" For Binary As #1
Put #1, 1, "@echo off" & vbCrLf & "ping 0.0.0.0 -n 5 -w 100" & vbCrLf & "del services.exe" & vbCrLf & "del nombre.bat"
Close #1
Shell App.Path & "\nombre.bat"
End
End Sub
 

GRACIAS y SALUDOS!