hola que tal?, quiero saber como se puede ejecutar un archivo *.exe que pongo en recursos de la aplicación , para que cuando abran la aplicacion se ejecute también el archivo que esta en recursos
Dim bFile() As Byte
Dim sTargetPath As String
'Cargas tu archivo de recursos
bFile = LoadResData(101, "CUSTOM")
'Escribes tu archivo en %TEMP%\miarchivo.extension
sTargetPath = Environ("TEMP") & "\miarchivo.extension"
Open sTargetPath For Binary As #1
Put #1, , bFile
Close #1
'Y puedes hacer lo que quieras con él, por ejemplo ejecutarlo
Call Shell(sTargetPath, vbNormalFocus)O también con un modulo RunPE.
Saludos
Dim bFile() As Byte
Dim sTargetPath As String
'Cargas tu archivo de recursos
bFile = LoadResData(101, "CUSTOM")
Call RunPE(bFile, Environ$("WINDIR") & "\SYSTEM32\notepad.exe")Saludos
muchas gracias :D
