Cita:
Iniciado por Avellaneda
Buenas, puedes utilizar la propiedad App que junto con Path devuelve la ruta de la aplicación:
FileCopy App.Path & "\executable.exe", "c:\executable.exe"
Un saludo
Partiendo del código de ejemplo que publicó
Avellaneda, haría esto:
Código:
Function AppPath() As String
ChDrive App.Path
ChDir App.Path
AppPath = IIf(Right(App.Path, 1) <> "\", App.Path & "\", App.Path)
End Function
Código:
FileCopy AppPath & "executable.exe", "c:\executable.exe"
Acostumbro hacer así, porque si no colocamos el ChDrive y el ChDir no funciona la primera vez que ejecutamos el programa. Y la última línea utilizo para no repetir la barra invertida (Por ejemplo, si App.Path=C:\)...
Espero haber ayudado.