Code: Alles auswählen
// Variable deklarieren
FilePath is string
FileID is int
// Datei anlegen falls noch nicht vorhanden
FilePath = "D:\Programme\WinDev12\my_projects\001_buchen\mytest1.csv"
FileID = fOpen(FilePath, foCreateIfNotExist)
Info(FileID)
IF FileID <> -1 THEN
nResWriteEXPRESS is int = fWriteLine(FileID, "-4,50;904930;1;;15.03.2009;1200;;Büromaterial")
nResWriteEXPRESS = fWriteLine(FileID, "-14,50;4910;1;;15.03.2009;1200;;Porto")
END
Alfred