Guten Morgen,
mit dem folgenden Code-Schnipsel, den ich im wesentlichen der online-Hilfe entnommen habe, füge ich einer bestehenden .txt-Datei eine Zeile hinzu:
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.opentextfile("W:\UDAS Test\txt-files\Data-file-02-" & jahr & Format(monat, "00") & tag & ".txt", 8, 0)
f.write "4; " & s_zaehlerstand_1 & Chr(13) & Chr(10)
f.Close
das funktioniert auch, nur habe ich zwischen dem bestehenden Teil der Datei und dem, was neu hinzukommt eine Leerzeile, die ich da nicht haben möchte. Chr(127) für DEL und Chr(8) für Backspace hab' ich schon ausprobiert, aber da bekomme ich nur das kleine Kästchen für nicht darstellbare Zeichen ausgegeben, die Leerzeile bleibt.
Hat jemand eine Idee?
Vielen Dank schon mal & schönen Gruß,
Andi