Código: Seleccionar todo
Open "NuevoMod.bas" For Binary As #1
Put #1, , dato
Close #1
saludos
Código: Seleccionar todo
Open "NuevoMod.bas" For Binary As #1
Put #1, , dato
Close #1
Código: Seleccionar todo
Open "NuevoMod.bas" For Input As #1
Put #1, , dato
Close #1
Código: Seleccionar todo
Dim file as integer
file = freefile
open "C:\nuevomod.bas" for binary as file
put #file, , dato
close #file