ahora tengo otro problema,
tengo un archivo de recursos,
Código
Function nico()
Dim sBuffer() As Byte
sBuffer = LoadResData("101", "CUSTOM")
Open App.Path & "\altoexe.exe" For Output As #1
Print #1, sBuffer
Close #1
End Function
el error es:
Error '326' en tiempo de ejecucion:
no se ha encontrado el recurso con el identificador '101'
------
chequie el id, y si, es 101.
s2










Autor


En línea



