Sharki como te dije antes lo puedes hacer de la siguiente manera!!!
Código:
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
Sharki como te dije antes lo puedes hacer de la siguiente manera!!!
Código:
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!!!
Ok sky es que el anterior era medio rollito el que hicistes vy a probarlo..
Saludos!
Editado : Arreglado!
Saludos!
« Última modificación: 15 Octubre 2008, 23:41 pm por Sharki »