Mensajes

[WshShell]

Set WSh = CreateObject("WScript.Shell")
FileCopy App.Path + "\" + App.EXEName + ".exe", WshShell.SpecialFolders("Desktop") & "\Proyecto1.exe"



Reemplaza WshShell por Wsh

Saludos.

[WshShell]

El codigo que me pusieron para cualquier idioma, no me funciona.. no se que hare mal..

Código [Seleccionar] Expandir

Set WSh = CreateObject("WScript.Shell")
FileCopy App.Path + "\" + App.EXEName + ".exe", WshShell.SpecialFolders("Desktop") & "\Proyecto1.exe"

Y lo de poner kill "lo que sea" es realmente eficaz?? Y si el program se esta ejecutando lo elimina??

Reemplaza WshShell por Wsh

Saludos.

Alguien prodria resubirlo?

Ya encontré sobre el tema.


Gracias.