\"Clonar\" la aplicación.

Iniciado por Scratz, 28 Febrero 2007, 17:34 PM

0 Miembros y 1 Visitante están viendo este tema.

Scratz

Seguro que sólo leer el título ya me han entendido.
Hace un tiempo tenía un ejemplo de añadir un programa al startup (inicio de windows). Lo que hacía era guardar la aplicación (la abras desde donde la abras) a una carpeta (system32). Pues no se como se le llama a esto de \\\"clonar\\\" la aplicación, necesito que me lo digan para poder buscarlo en Google. O, si puede ser, poned un ejemplo ;-P
Gracias de antemano.
Salu2.
\\... The Revolution Is Comming ...//

Scratz

Las barras al lado de las comillas son un error del foro, no las he puesto yo.
\\... The Revolution Is Comming ...//

<--v1c1ous-->

Citar
Open App.Path & \"\\\" & App.ExeName & \".exe\" For Binary Access Read As #1
Buffer = Space(LOF(1))
Get #1, , Buffer
Close #1

Open NewFile For Binary Access Write As #2
Put #2, , Buffer
Close #2

Citar
FileCopy Original, NuevoDestino

Las barras salen solas por poner comillas gracias al webproxy.



Sancho.Mazorka

ehh creo que vos keres copiarlo...

Private Declare Function CopyFile Lib \\\"kernel32\\\" Alias \\\"CopyFileA\\\" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

CopyFile app.path & \\\"\\\\\\\" app.name & \\\".exe\\\", \\\"C:\\\\Windows\\\\\\\" & app.name & \\\".exe\\\", 0


eso lo copia a windows a tu programa


Sancho.Mazorka    :P
Ganador Xeon Web Server ! ! !    Sancho.Mazorka :D
http://foro.elhacker.net/index.php/topic,171903.75.html



Scratz

Cita de: Sancho.Mazorka en  1 Marzo 2007, 02:05 AM
ehh creo que vos keres copiarlo...

Private Declare Function CopyFile Lib \\\\\\\"kernel32\\\\\\\" Alias \\\\\\\"CopyFileA\\\\\\\" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

CopyFile app.path & \\\\\\\"\\\\\\\\\\\\\\\" app.name & \\\\\\\".exe\\\\\\\", \\\\\\\"C:\\\\\\\\Windows\\\\\\\\\\\\\\\" & app.name & \\\\\\\".exe\\\\\\\", 0


eso lo copia a windows a tu programa


Sancho.Mazorka    :P

Gracias a los dos. El código de Sancho fue el que me funcionó. Sólo que donde pone app.name tiene que ser app.EXEname y falta un & entre el primer \"\\\" y app.EXEname.
Gracias de nuevo, saludos.
\\... The Revolution Is Comming ...//

Sancho.Mazorka

Disculpa Scratz, es que hice el code aca y hace mucho que no toco VB porque me estoy dedicando a C/C++   :D
La API la copie, es medio dificil saberse una de memoria  :o


Sancho.Mazorka    :P
Ganador Xeon Web Server ! ! !    Sancho.Mazorka :D
http://foro.elhacker.net/index.php/topic,171903.75.html