a=filesize ( filename)
s = space$(a) ' string auf die dateilänge bringen
nr=freefile ' ned unbedingt notwendig...
open filename for binary as nr
get nr,,s
close nr
zum schreiben:
open filename for binary as nr
put nr,,s
close nr
file brauchst ned unbedingt dazwischen zu schliessen weil binary erlaubt gleichzeitiges lesen und schreiben.
____________________________________
Wann die kan Almdudler ham... \"Es gibt nur einen Weg zur Lunge, und der muss geteert werden, damit der Krebs nicht stolpert!\"
http://www.dream.at/gizmo/bunny.gif
Image is © 2001 Merle
Sterndalsäg.. ähh... jäger 
|