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
podes hacerlo con
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
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?
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:
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:
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.
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