# txt-Datei Aufrufen,Schreiben,Speichern

**URL:** <https://oscat.discourse.group/t/txt-datei-aufrufen-schreiben-speichern/1858>\
**Category:** SPS-Programmierung\
**Created:** [6. Januar 2015 um 11:13 UTC](https://oscat.discourse.group/t/txt-datei-aufrufen-schreiben-speichern/1858 "2015-01-06T11:13:22Z")\
**Posts on this page:** 1\
**Page:** 1

<div class="post-metadata">

**Author:** ![system](https://global.discourse-cdn.com/free1/uploads/oscat/original/1X/2efdfb9c592ff9a666c94dff124ee84fa863dae5.jpeg) [@system](https://oscat.discourse.group/u/system)\
**Post date:** [6. Januar 2015 um 11:13 UTC](https://oscat.discourse.group/t/txt-datei-aufrufen-schreiben-speichern/1858/1 "2015-01-06T11:13:22Z")

</div>

Hallo Forumgemeinde,  
meine Aufgabe ist es ein Array, welches durch Codesys3.5 erstellt wurde, in eine .txt- bzw. .csv-Datei zu schreiben. Bis jetzt sind jegliche Versuche gescheitert, eine Datei zu öffnen, geschweige denn zu schreiben. Aktuell versuche ich erstmal einen String in eine Datei zu schreiben. Ich bin über jeden Hinweis bzw. Lösung sehr dankbar.

Hier der bisherige Code:

FUNCTION\_BLOCK POU  
VAR\_INPUT  
END\_VAR  
VAR\_OUTPUT  
hFile: DWORD;  
END\_VAR  
VAR  
R\_TRIG\_SAVE: R\_TRIG;  
speichern: BOOL := TRUE;  
Text: STRING := ‘Hallo Welt’;  
anz\_bytes: DWORD;  
Ergebnis: UDINT;  
Acess : ACCESS\_MODE;  
END\_VAR

R\_TRIG\_SAVE(CLK:=speichern);  
IF R\_TRIG\_SAVE.Q THEN  
hFile := SysFileOpen(‘c:\Neu.txt’,Acess,Ergebnis);  
anz\_bytes:=SysFileWrite(hFile ,ADR(Text),LEN(Text),Ergebnis);  
sysFileClose(hFile);  
END\_IF

[gelöscht durch Administrator]