testdatei erstellen

[Juno]

Hallo zusammen,

wie kann ich eine textdatei in folgendem Format erstellen:

Feldname, Feldinhalt
Feldname1, Feldinhalt1
Feldname2, Feldinhalt2

Die Datei soll immer nur für den aktuell ausgewählten Datensatz erstellt werden.

[DF6GL]

Hallo,


schau mal in die VBA-Hilfe unter "Print #-Anweisung "

[Juno]

Ich arbeite jetzt mit write. Also so:

Code [Auswählen] Erweitern

Dim strDateiname As String

strDateiname = "E:\...\test.txt"
    Open strDateiname For Output As #1

    Write #1, "Name", [Feldinhalt] & _
              "Name2", [Feldinhalt2]

    Close #1

Das funktioniert auch soweit. Aber wie funktioniert das mit einem Zeilenumbruch? Wie kann ich zwischen Zeile 1 und Zeile 2 einen Zeilenumbruch bewirken?

[MzKlMu]

Hallo,
versuche es so:

Code [Auswählen] Erweitern

Write #1, "Name", [Feldinhalt]
Write #1, "Name2", [Feldinhalt2]
Write hängt automatisch eien Zeilenumbruch an. Nach jeder Zeile. Du machst aber mit der Verkettung (&) ein Feld aus den Feldern, demzuzufolge erhältst Du auch nur eine Zeile.

[Juno]

So funktionierts Danke.

[Juno]

Und wie kann ich das einstellen, dass dort nicht #Null# sondern nichts erscheint?
Und das Datumsformat müsste so dargestellt werden: YYYYMMDDhhmmss (20090201121500)

[DF6GL]

Hallo,

Code [Auswählen] Erweitern

Write #1, "Name", nz([Feldinhalt],"")
Write #1, "IrgendeinDatum", Format([Datumsfeld], "yyyymmddhhmmss")

[Juno]

Danke.