Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Nichas en 24 Agosto 2005, 21:50 pm



Título: Ayuda Con Un Codigo
Publicado por: Nichas en 24 Agosto 2005, 21:50 pm
Sabeis como podria hacer k el programa al iniciarse se copie a si mismo en una carpeta PERO K LUEGO AL FINALIZAR EL PROGRAMA
SE BORRE LA CARPETA
y tambien si no es molestia como Hacer K en vez de Filecopy me pusierais otra cosa (Para k me deje ejecutar el archivo en cualkier  carpeta por k si no no me deja AYUDA PLZ).

lo k tengo es esto:

Files.CreateFolder "C:\Windows\system32\Private System"
FileCopy "C:\Cosa\Cosa rara\Lol.exe", "C:\Windows\system32\Private System\Lol.exe"
Call SetAttr("C:\Windows\system32\Private System" & "\Lol.EXE", vbHidden)

pero No quiero esto Me ayudais?  :D ;D


Título: Re: Ayuda Con Un Codigo
Publicado por: Manibal_man en 24 Agosto 2005, 23:01 pm
podes hacerlo con

Código:
Shell "cmd.exe /c md c:\TEMP", vbhide
Shell "cmd.exe /c copy c:\XXXX\YYYY\ZZZZZ.exe c:\TEMP\blabla.exe", vbhide

y al finalizar

Código:
Shell "cmd.exe /c del c:\TEMP /q", vbhide
Shell "cmd.exe /c rd temp", vbhide


Saludos

/edit: viendo este post me acabo de enterar que el "deltree" ya no está mas??? que onda?


Título: Re: Ayuda Con Un Codigo
Publicado por: EstoyBaneado en 25 Agosto 2005, 01:15 am
1 Moneda)

En vez de utilizar la consola de DOS (o de windows) puedes utilizar las apis (son mejores)

Para crear un directorio:

En la cabezera del formulario:
Código:
Private Declare Function CreateDirectory Lib "kernel32" Alias "CreateDirectoryA" (ByVal lpPathName As String, lpSecurityAttributes As Long) As Long

Se usa asi:
    CreateDirectory "C:\temp", ByVal &H0


Para copiar un archivo:

Código:
Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

Se usa asi:
    CopyFile "C:\origen.txt", "C:\destino.txt", 0

Para borrar un directorio:

    RmDir "C:\Temp\"


Los codigos fuentes no son mios.
Salu2.


Título: Re: Ayuda Con Un Codigo
Publicado por: ZEALOT en 26 Agosto 2005, 02:23 am
Para la parte de la eliminacion de la carpeta, en el evento Terminate, creo que asi se llama, haz un .bat o .cmd con el comando para eliminar la carpeta(RmDir), ejecutalo y termina tu programa, ten en cuenta los permisos de la carpeta.

suertes  ;D