Hi,
Hmmmmmm, was genau möchtest du den nu ???
1: Aus Datei #1 auslesen und in Datei #2 Schreiben ????
2: Aus Datei #1 in Bereichsvariable ????
3: aus ???? nach ?????
Erseters:
Assign #1,"File1"
Assign #2,"File2"
Reset #1
Rewrite #2
While equ(eof(#1),0)
Input #1, lese$
'lese$ verändern oder sonst was ....
print #2,lese$
Wend
Close #1
Close #2
Nummer zwei: Text in Bereichsvariable .....
Assign #1,"File1"
Reset #1
While equ(eof(#1),0)
Input #1,lese$
'lese$ = .... lese$ verändern, bearbeiten ...
String line#,adr% = lese$
add adr%,len(lese$)
Wend
close #1
Achja, es geht sogar noch einfacher, wenn der Text einfach
nur in die Bereichs-Variable soll:
Assign #1,"file1"
OpenRW #1
BlockRead(#1,line#,0,lof(#1))
Close #1
oder sogar noch kürzer:
ReadText line#,"file1"
|