PureBoard

hallo ts-soft,

danke für den UseFile Tip :allright: , jetzt funktioniert es bei mir.
mußte zusätzlich die länge bei Mid noch anpassen (5) ...
jetzt funzt es ...


testdatei1$ = "c:\testdatei1.txt"
testdatei2$ = "c:\testdatei2.txt"

If ReadFile(0, testdatei1$)
If CreateFile(1, testdatei2$)
While ...

hab folgendes probiert, funktioniert aber noch nicht...


testdatei1$ = "c:\testdatei1.txt"
testdatei2$ = "c:\testdatei2.txt"

if ReadFile(0, testdatei1$)
if CreateFile(1, testdatei2$)
While Eof(0) = 0
dummy$ = ReadString() ; sollte testdatei1.txt zeileweise lesen
WriteStringN( Mid(dummy$,6 ...

hallo,

ich möchte eine textdatei zeile für zeile einlesen und gleichzeitig in eine neue textdatei schreiben.

beispiel:

textdatei1.txt
1111 test
2222 hallo
3333 test2

textdatei2.txt erzeugen
test
hallo
test2

hat jemand einen passende pb code für mich?

gruss
toyman