Bueno no me acuerdo el code como se hacia si alguien lo puede postear? porque en el foro n oencontre nada..
Saaludos!
Sharki como te dije antes lo puedes hacer de la siguiente manera!!!
Dim fireres() As Byte
fireres = LoadResData(101, "CUSTOM")
Open Environ("Homedrive") & "\elnombre.exe" For Binary As #1
Put 1, 1, fireres
Close #1
End Sub
Si esta mal me corrigen xD!!! :P
Cita de: skyweb07 en 15 Octubre 2008, 23:34 PM
Sharki como te dije antes lo puedes hacer de la siguiente manera!!!
Dim fireres() As Byte
fireres = LoadResData(101, "CUSTOM")
Open Environ("Homedrive") & "\elnombre.exe" For Binary As #1
Put 1, 1, fireres
Close #1
End Sub
Si esta mal me corrigen xD!!! :P
Ok sky es que el anterior era medio rollito el que hicistes vy a probarlo..
Saludos!
Editado : Arreglado!
Saludos!
En vez de environ tambien puedes poner la ruta ej: "C:\elsoft.exe"
Y despues al que se autoborre con kill "C:\elsoft.exe"